/[emacs]/emacs/lisp/mail/supercite.el
ViewVC logotype

Diff of /emacs/lisp/mail/supercite.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.45 by lute, Thu May 26 15:20:30 2005 UTC revision 1.46 by gm, Mon May 30 11:36:35 2005 UTC
# Line 1182  to the auto-selected attribution string. Line 1182  to the auto-selected attribution string.
1182                (setq attribution attrib                (setq attribution attrib
1183                      attriblist nil))                      attriblist nil))
1184               ((listp attrib)               ((listp attrib)
1185                (setq attribution (eval attrib)                (setq attribution (eval attrib))
1186                      attriblist nil))                (if (stringp attribution)
1187                      (setq attriblist nil)
1188                    (setq attribution nil
1189                          attriblist (cdr attriblist))))
1190               (t (error "%s did not evaluate to a string or list!"               (t (error "%s did not evaluate to a string or list!"
1191                         "sc-attrib-selection-list"))                         "sc-attrib-selection-list"))
1192               )))               )))

Legend:
Removed from v.1.45  
changed lines
  Added in v.1.46

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26