diff options
author | Richard M. Stallman <rms@gnu.org> | 1997-05-20 18:51:22 +0000 |
---|---|---|
committer | Richard M. Stallman <rms@gnu.org> | 1997-05-20 18:51:22 +0000 |
commit | 60382faa3acb325dbae749fa4d379e102345b8b3 (patch) | |
tree | 01429f6ba4cd120b88e560dec6c831e5066c5a0f /lisp/dos-w32.el | |
parent | f4ff0fb4feedde7155855de8a6226d998b2ee526 (diff) | |
download | emacs-60382faa3acb325dbae749fa4d379e102345b8b3.tar.gz |
(add-untranslated-filesystem)
(remove-untranslated-filesystem): Add interactive spec.
Diffstat (limited to 'lisp/dos-w32.el')
-rw-r--r-- | lisp/dos-w32.el | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/lisp/dos-w32.el b/lisp/dos-w32.el index e532ba33a4f..a617bbec74e 100644 --- a/lisp/dos-w32.el +++ b/lisp/dos-w32.el @@ -149,6 +149,7 @@ CR/LF translation, and nil otherwise." CR/LF translation. FILESYSTEM is a string containing the directory prefix corresponding to the filesystem. For example, for a Unix filesystem mounted on drive Z:, FILESYSTEM could be \"Z:\"." + (interactive "fUntranslated file system: ") (let ((fs (untranslated-canonical-name filesystem))) (if (member fs untranslated-filesystem-list) untranslated-filesystem-list @@ -160,6 +161,7 @@ filesystem mounted on drive Z:, FILESYSTEM could be \"Z:\"." CR/LF translation. FILESYSTEM is a string containing the directory prefix corresponding to the filesystem. For example, for a Unix filesystem mounted on drive Z:, FILESYSTEM could be \"Z:\"." + (interactive "fUntranslated file system: ") (setq untranslated-filesystem-list (delete (untranslated-canonical-name filesystem) untranslated-filesystem-list))) |