diff options
Diffstat (limited to 'lisp/url')
| -rw-r--r-- | lisp/url/ChangeLog | 5 | ||||
| -rw-r--r-- | lisp/url/url-mailto.el | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/lisp/url/ChangeLog b/lisp/url/ChangeLog index 261635d51e2..eb10dd2a933 100644 --- a/lisp/url/ChangeLog +++ b/lisp/url/ChangeLog | |||
| @@ -1,3 +1,8 @@ | |||
| 1 | 2004-11-12 Masatake YAMATO <jet@gyve.org> | ||
| 2 | |||
| 3 | * url-mailto.el (url-mailto): Fix a typo in the | ||
| 4 | comment. | ||
| 5 | |||
| 1 | 2004-11-02 Masatake YAMATO <jet@gyve.org> | 6 | 2004-11-02 Masatake YAMATO <jet@gyve.org> |
| 2 | 7 | ||
| 3 | * url-imap.el (url-imap-open-host): Don't use | 8 | * url-imap.el (url-imap-open-host): Don't use |
diff --git a/lisp/url/url-mailto.el b/lisp/url/url-mailto.el index f5192bcb03f..42793093117 100644 --- a/lisp/url/url-mailto.el +++ b/lisp/url/url-mailto.el | |||
| @@ -63,7 +63,7 @@ | |||
| 63 | (defun url-mailto (url) | 63 | (defun url-mailto (url) |
| 64 | "Handle the mailto: URL syntax." | 64 | "Handle the mailto: URL syntax." |
| 65 | (if (url-user url) | 65 | (if (url-user url) |
| 66 | ;; malformed mailto URL (mailto://wmperry@gnu.org instead of | 66 | ;; malformed mailto URL (mailto://wmperry@gnu.org) instead of |
| 67 | ;; mailto:wmperry@gnu.org | 67 | ;; mailto:wmperry@gnu.org |
| 68 | (url-set-filename url (concat (url-user url) "@" (url-filename url)))) | 68 | (url-set-filename url (concat (url-user url) "@" (url-filename url)))) |
| 69 | (setq url (url-filename url)) | 69 | (setq url (url-filename url)) |