diff options
| author | Richard M. Stallman | 1993-10-01 22:40:49 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1993-10-01 22:40:49 +0000 |
| commit | 8e1f920c03d90ec4fe0d7dfe2ab4a9ce9a49d58e (patch) | |
| tree | bb5a24baeae016304221e45546388064a79a01f6 | |
| parent | 2b878b4c6b5b1ad0d2c3ef199b8e5c74d4c791d9 (diff) | |
| download | emacs-8e1f920c03d90ec4fe0d7dfe2ab4a9ce9a49d58e.tar.gz emacs-8e1f920c03d90ec4fe0d7dfe2ab4a9ce9a49d58e.zip | |
(build-mail-abbrevs): Pass just 1 arg to substitute-in-file-name.
| -rw-r--r-- | lisp/mail/mailabbrev.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/mail/mailabbrev.el b/lisp/mail/mailabbrev.el index c07a1bea6d5..4a41faff1c4 100644 --- a/lisp/mail/mailabbrev.el +++ b/lisp/mail/mailabbrev.el | |||
| @@ -202,7 +202,7 @@ no aliases, which is represented by this being a table with no entries.)") | |||
| 202 | (end-of-line) | 202 | (end-of-line) |
| 203 | (build-mail-abbrevs | 203 | (build-mail-abbrevs |
| 204 | (substitute-in-file-name | 204 | (substitute-in-file-name |
| 205 | (buffer-substring (match-beginning 1) (match-end 1)) t))) | 205 | (buffer-substring (match-beginning 1) (match-end 1))))) |
| 206 | (re-search-forward "[ \t]+\\([^ \t\n]+\\)") | 206 | (re-search-forward "[ \t]+\\([^ \t\n]+\\)") |
| 207 | (let* ((name (buffer-substring | 207 | (let* ((name (buffer-substring |
| 208 | (match-beginning 1) (match-end 1))) | 208 | (match-beginning 1) (match-end 1))) |