/[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.278 by handa, Tue Jul 19 02:29:58 2005 UTC revision 1.279 by handa, Fri Jul 29 01:44:52 2005 UTC
# Line 1027  it asks the user to select a proper codi Line 1027  it asks the user to select a proper codi
1027          ;; We should never use no-conversion for outgoing mail.          ;; We should never use no-conversion for outgoing mail.
1028          (setq coding nil))          (setq coding nil))
1029      (if (fboundp select-safe-coding-system-function)      (if (fboundp select-safe-coding-system-function)
1030          (funcall select-safe-coding-system-function          (setq coding
1031                   (point-min) (point-max) coding                (funcall select-safe-coding-system-function
1032                   (function (lambda (x) (coding-system-get x 'mime-charset))))                         (point-min) (point-max) coding
1033        coding)))                         (function (lambda (x)
1034                                       (coding-system-get x 'mime-charset))))))
1035        (if coding
1036            ;; Be sure to use LF for end-of-line.
1037            (setq coding (coding-system-change-eol-conversion coding 'unix))
1038          ;; No coding system is decided.  Usually this is the case that
1039          ;; the current buffer contains only ASCII.  So, we hope
1040          ;; iso-8859-1 works.
1041          (setq coding 'iso-8859-1-unix))
1042        coding))
1043    
1044  ;;; Language support stuff.  ;;; Language support stuff.
1045    

Legend:
Removed from v.1.278  
changed lines
  Added in v.1.279

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