/[emacs]/emacs/lisp/mh-e/mh-identity.el
ViewVC logotype

Diff of /emacs/lisp/mh-e/mh-identity.el

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

revision 1.3.4.4 by miles, Sat Sep 4 09:22:56 2004 UTC revision 1.3.4.5 by miles, Sat Sep 4 09:26:23 2004 UTC
# Line 127  message header." Line 127  message header."
127    (or (cdr (assoc (downcase field) mh-identity-handlers))    (or (cdr (assoc (downcase field) mh-identity-handlers))
128        (and (eq (aref field 0) ?:)        (and (eq (aref field 0) ?:)
129             (error (format "Field %s - unknown mh-identity-handler" field)))             (error (format "Field %s - unknown mh-identity-handler" field)))
130        (cdr (assoc "default" mh-identity-handlers))        (cdr (assoc ":default" mh-identity-handlers))
131        'mh-identity-handler-default))        'mh-identity-handler-default))
132    
133  ;;;###mh-autoload  ;;;###mh-autoload

Legend:
Removed from v.1.3.4.4  
changed lines
  Added in v.1.3.4.5

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