diff options
| author | Chong Yidong | 2005-09-02 12:30:51 +0000 |
|---|---|---|
| committer | Chong Yidong | 2005-09-02 12:30:51 +0000 |
| commit | 14bd660e692505fdfeeb15cbc655b20cfe2de197 (patch) | |
| tree | d97760b701ebbd67e897f17ba5e44f31cc162cb1 | |
| parent | 6fd388f37c90d733cd11925c73acfb6af17907cd (diff) | |
| download | emacs-14bd660e692505fdfeeb15cbc655b20cfe2de197.tar.gz emacs-14bd660e692505fdfeeb15cbc655b20cfe2de197.zip | |
*** empty log message ***
| -rw-r--r-- | lisp/url/url-mailto.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/url/url-mailto.el b/lisp/url/url-mailto.el index 9b63a35f3bd..3316b7c4b9d 100644 --- a/lisp/url/url-mailto.el +++ b/lisp/url/url-mailto.el | |||
| @@ -88,7 +88,7 @@ | |||
| 88 | (if tolist | 88 | (if tolist |
| 89 | (if (not (string= to "")) | 89 | (if (not (string= to "")) |
| 90 | (setcdr tolist | 90 | (setcdr tolist |
| 91 | (list (concat to ", " (nth 1 tolist))))) | 91 | (list (concat to ", " (cadr tolist))))) |
| 92 | (setq args (cons (list "to" to) args)))) | 92 | (setq args (cons (list "to" to) args)))) |
| 93 | 93 | ||
| 94 | (setq subject (cdr-safe (assoc "subject" args))) | 94 | (setq subject (cdr-safe (assoc "subject" args))) |