Parent Directory | Revision Log | 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 |
|
savannah-hackers-public@gnu.org | ViewVC Help |
Powered by ViewVC 1.1.26 |