diff options
| author | Juanma Barranquero | 2004-05-30 21:21:42 +0000 |
|---|---|---|
| committer | Juanma Barranquero | 2004-05-30 21:21:42 +0000 |
| commit | 915b0bf0ab6ed6d9ae587954cd144290ece4c089 (patch) | |
| tree | 3ff5945545759d8978afffe74b512ffc80d2f069 | |
| parent | 2fcaee47a419d668b304d75f7511f2090c6736be (diff) | |
| download | emacs-915b0bf0ab6ed6d9ae587954cd144290ece4c089.tar.gz emacs-915b0bf0ab6ed6d9ae587954cd144290ece4c089.zip | |
Rework docstring (wording by Eli Zaretskii and Kai Grossjohann).
| -rw-r--r-- | lisp/dos-fns.el | 10 | ||||
| -rw-r--r-- | lisp/files.el | 13 | ||||
| -rw-r--r-- | lisp/w32-fns.el | 10 |
3 files changed, 23 insertions, 10 deletions
diff --git a/lisp/dos-fns.el b/lisp/dos-fns.el index 65b6c0063c0..1253b7b5811 100644 --- a/lisp/dos-fns.el +++ b/lisp/dos-fns.el | |||
| @@ -31,9 +31,13 @@ | |||
| 31 | ;; This overrides a trivial definition in files.el. | 31 | ;; This overrides a trivial definition in files.el. |
| 32 | (defun convert-standard-filename (filename) | 32 | (defun convert-standard-filename (filename) |
| 33 | "Convert a standard file's name to something suitable for the current OS. | 33 | "Convert a standard file's name to something suitable for the current OS. |
| 34 | This function's standard definition is trivial; it just returns the argument. | 34 | This means to guarantee valid names and perhaps to canonicalize |
| 35 | However, on some systems, the function is redefined | 35 | certain patterns. |
| 36 | with a definition that really does change some file names." | 36 | |
| 37 | On Windows and DOS, replace invalid characters. On DOS, make | ||
| 38 | sure to obey the 8.3 limitations. On Windows, turn Cygwin names | ||
| 39 | into native names, and also turn slashes into backslashes if the | ||
| 40 | shell requires it (see `w32-shell-dos-semantics')." | ||
| 37 | (if (or (not (stringp filename)) | 41 | (if (or (not (stringp filename)) |
| 38 | ;; This catches the case where FILENAME is "x:" or "x:/" or | 42 | ;; This catches the case where FILENAME is "x:" or "x:/" or |
| 39 | ;; "/", thus preventing infinite recursion. | 43 | ;; "/", thus preventing infinite recursion. |
diff --git a/lisp/files.el b/lisp/files.el index 47f4c070cba..81e014d2283 100644 --- a/lisp/files.el +++ b/lisp/files.el | |||
| @@ -481,10 +481,15 @@ Runs the usual ange-ftp hook, but only for completion operations." | |||
| 481 | 481 | ||
| 482 | (defun convert-standard-filename (filename) | 482 | (defun convert-standard-filename (filename) |
| 483 | "Convert a standard file's name to something suitable for the current OS. | 483 | "Convert a standard file's name to something suitable for the current OS. |
| 484 | This function's standard definition is trivial; it just returns the argument. | 484 | This means to guarantee valid names and perhaps to canonicalize |
| 485 | However, on some systems, the function is redefined with a definition | 485 | certain patterns. |
| 486 | that really does change some file names to canonicalize certain | 486 | |
| 487 | patterns and to guarantee valid names." | 487 | This function's standard definition is trivial; it just returns |
| 488 | the argument. However, on Windows and DOS, replace invalid | ||
| 489 | characters. On DOS, make sure to obey the 8.3 limitations. On | ||
| 490 | Windows, turn Cygwin names into native names, and also turn | ||
| 491 | slashes into backslashes if the shell requires it (see | ||
| 492 | `w32-shell-dos-semantics')." | ||
| 488 | filename) | 493 | filename) |
| 489 | 494 | ||
| 490 | (defun read-directory-name (prompt &optional dir default-dirname mustmatch initial) | 495 | (defun read-directory-name (prompt &optional dir default-dirname mustmatch initial) |
diff --git a/lisp/w32-fns.el b/lisp/w32-fns.el index 4a485414d7a..86703a3b9b5 100644 --- a/lisp/w32-fns.el +++ b/lisp/w32-fns.el | |||
| @@ -230,9 +230,13 @@ You should set this to t when using a non-system shell.\n\n")))) | |||
| 230 | 230 | ||
| 231 | (defun convert-standard-filename (filename) | 231 | (defun convert-standard-filename (filename) |
| 232 | "Convert a standard file's name to something suitable for the current OS. | 232 | "Convert a standard file's name to something suitable for the current OS. |
| 233 | This function's standard definition is trivial; it just returns the argument. | 233 | This means to guarantee valid names and perhaps to canonicalize |
| 234 | However, on some systems, the function is redefined | 234 | certain patterns. |
| 235 | with a definition that really does change some file names." | 235 | |
| 236 | On Windows and DOS, replace invalid characters. On DOS, make | ||
| 237 | sure to obey the 8.3 limitations. On Windows, turn Cygwin names | ||
| 238 | into native names, and also turn slashes into backslashes if the | ||
| 239 | shell requires it (see `w32-shell-dos-semantics')." | ||
| 236 | (let ((name | 240 | (let ((name |
| 237 | (save-match-data | 241 | (save-match-data |
| 238 | (if (string-match "\\`/cygdrive/\\([a-zA-Z]\\)/" filename) | 242 | (if (string-match "\\`/cygdrive/\\([a-zA-Z]\\)/" filename) |