Mercurial > emacs

comparison lisp/international/mule.el @ 26716:256531a93e10

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Docstring modified.
author Kenichi Handa <handa@m17n.org>
date Mon, 06 Dec 1999 04:53:04 +0000
parents c4fb0ef75056
children 2f284b9ec711
comparison
equal deleted inserted replaced
26715:626e80b37895 26716:256531a93e10
758 758
759 If the buffer's previous file coding-system value specifies end-of-line 759 If the buffer's previous file coding-system value specifies end-of-line
760 conversion, and CODING-SYSTEM does not specify one, CODING-SYSTEM is 760 conversion, and CODING-SYSTEM does not specify one, CODING-SYSTEM is
761 merged with the already-specified end-of-line conversion. 761 merged with the already-specified end-of-line conversion.
762 However, if the optional prefix argument FORCE is non-nil, 762 However, if the optional prefix argument FORCE is non-nil,
763 then CODING-SYSTEM is used exactly as specified." 763 then CODING-SYSTEM is used exactly as specified.
764
765 This marks the buffer modified so that the succeeding \\[save-buffer]
766 surely saves the buffer with CODING-SYSTEM. From a program, if you
767 don't want to mark the buffer modified, just set the variable
768 `buffer-file-coding-system' directly."
764 (interactive "zCoding system for visited file (default, nil): \nP") 769 (interactive "zCoding system for visited file (default, nil): \nP")
765 (check-coding-system coding-system) 770 (check-coding-system coding-system)
766 (if (null force) 771 (if (null force)
767 (let ((x (coding-system-eol-type buffer-file-coding-system)) 772 (let ((x (coding-system-eol-type buffer-file-coding-system))
768 (y (coding-system-eol-type coding-system))) 773 (y (coding-system-eol-type coding-system)))