diff options
| author | John Paul Wallington <jpw@pobox.com> | 2008-08-21 12:24:48 +0000 |
|---|---|---|
| committer | John Paul Wallington <jpw@pobox.com> | 2008-08-21 12:24:48 +0000 |
| commit | 6da54b82e4a16fe8678c23a820608c351a9d5cb1 (patch) | |
| tree | 66291d7ee5d519834351bb6aff2474f57a5944d8 /lisp/mail | |
| parent | 87aae241a4afad18d155e1c7a6d94c95022ffe82 (diff) | |
| download | emacs-6da54b82e4a16fe8678c23a820608c351a9d5cb1.tar.gz | |
(rmail-insert-inbox-text): Ensure that the filename of `tofile'
doesn't contain any colons so that it works on Windows, Cygwin, and
MS-DOS systems.
Diffstat (limited to 'lisp/mail')
| -rw-r--r-- | lisp/mail/rmail.el | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/lisp/mail/rmail.el b/lisp/mail/rmail.el index d2329452ce4..6e3056da407 100644 --- a/lisp/mail/rmail.el +++ b/lisp/mail/rmail.el @@ -1803,9 +1803,9 @@ is non-nil if the user has supplied the password interactively. ;; in case of multiple inboxes that need moving. (concat ".newmail-" (file-name-nondirectory - (if (memq system-type '(windows-nt cygwin)) - ;; cannot have "po:" in file name - (substring file 3) + (if (memq system-type '(windows-nt cygwin ms-dos)) + ;; cannot have colons in file name + (replace-regexp-in-string ":" "-" file) file))) ;; Use the directory of this rmail file ;; because it's a nuisance to use the homedir |