/[emacs]/emacs/lisp/international/mule-cmds.el
ViewVC logotype

Diff of /emacs/lisp/international/mule-cmds.el

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

revision 1.185.2.20 by fx, Sun Oct 6 16:23:09 2002 UTC revision 1.185.2.21 by handa, Wed Oct 9 06:13:57 2002 UTC
# Line 619  and TO is ignored." Line 619  and TO is ignored."
619              mime-charset)              mime-charset)
620          (while l          (while l
621            (setq mime-charset (coding-system-get (car l) :mime-charset))            (setq mime-charset (coding-system-get (car l) :mime-charset))
622            (if (and mime-charset (coding-system-p mime-charset))            (if (and mime-charset (coding-system-p mime-charset)
623                       (coding-system-equal (car l) mime-charset))
624                (setcar l mime-charset))                (setcar l mime-charset))
625            (setq l (cdr l))))            (setq l (cdr l))))
626    

Legend:
Removed from v.1.185.2.20  
changed lines
  Added in v.1.185.2.21

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