Mercurial > emacs
comparison lisp/files.el @ 100700:90aefe38789d
(dosified-file-name): Declare.
| author | Eli Zaretskii <eliz@gnu.org> |
|---|---|
| date | Fri, 26 Dec 2008 17:59:48 +0000 |
| parents | bc724faa95e6 |
| children | 0082d8f02c6f |
comparison
equal
deleted
inserted
replaced
| 100699:ad20c1d5df89 | 100700:90aefe38789d |
|---|---|
| 212 (declare-function dired-get-filename "dired" (&optional localp no-error-if-not-filep)) | 212 (declare-function dired-get-filename "dired" (&optional localp no-error-if-not-filep)) |
| 213 (declare-function dired-unmark "dired" (arg)) | 213 (declare-function dired-unmark "dired" (arg)) |
| 214 (declare-function dired-do-flagged-delete "dired" (&optional nomessage)) | 214 (declare-function dired-do-flagged-delete "dired" (&optional nomessage)) |
| 215 (declare-function dos-8+3-filename "dos-fns" (filename)) | 215 (declare-function dos-8+3-filename "dos-fns" (filename)) |
| 216 (declare-function view-mode-disable "view" ()) | 216 (declare-function view-mode-disable "view" ()) |
| 217 (declare-function dosified-file-name "dos-fns" (file-name)) | |
| 217 | 218 |
| 218 (defvar file-name-invalid-regexp | 219 (defvar file-name-invalid-regexp |
| 219 (cond ((and (eq system-type 'ms-dos) (not (msdos-long-file-names))) | 220 (cond ((and (eq system-type 'ms-dos) (not (msdos-long-file-names))) |
| 220 (concat "^\\([^A-Z[-`a-z]\\|..+\\)?:\\|" ; colon except after drive | 221 (concat "^\\([^A-Z[-`a-z]\\|..+\\)?:\\|" ; colon except after drive |
| 221 "[+, ;=|<>\"?*]\\|\\[\\|\\]\\|" ; invalid characters | 222 "[+, ;=|<>\"?*]\\|\\[\\|\\]\\|" ; invalid characters |