/[emacs]/emacs/lisp/files.el
ViewVC logotype

Diff of /emacs/lisp/files.el

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

revision 1.736 by handa, Thu Dec 30 12:42:11 2004 UTC revision 1.737 by handa, Thu Dec 30 23:56:23 2004 UTC
# Line 3239  Before and after saving the buffer, this Line 3239  Before and after saving the buffer, this
3239        (let ((coding-system-for-write save-buffer-coding-system))        (let ((coding-system-for-write save-buffer-coding-system))
3240          (basic-save-buffer-2))          (basic-save-buffer-2))
3241      (basic-save-buffer-2))      (basic-save-buffer-2))
3242    (setq explicit-buffer-file-coding-system last-coding-system-used))    (setq buffer-file-coding-system-explicit last-coding-system-used))
3243    
3244  ;; This returns a value (MODES . BACKUPNAME), like backup-buffer.  ;; This returns a value (MODES . BACKUPNAME), like backup-buffer.
3245  (defun basic-save-buffer-2 ()  (defun basic-save-buffer-2 ()
# Line 3713  non-nil, it is called instead of rereadi Line 3713  non-nil, it is called instead of rereadi
3713                            ;; internal coding.                            ;; internal coding.
3714                            (if auto-save-p 'auto-save-coding                            (if auto-save-p 'auto-save-coding
3715                              (or coding-system-for-read                              (or coding-system-for-read
3716                                  explicit-buffer-file-coding-system))))                                  buffer-file-coding-system-explicit))))
3717                       ;; This force after-insert-file-set-coding                       ;; This force after-insert-file-set-coding
3718                       ;; (called from insert-file-contents) to set                       ;; (called from insert-file-contents) to set
3719                       ;; buffer-file-coding-system to a proper value.                       ;; buffer-file-coding-system to a proper value.

Legend:
Removed from v.1.736  
changed lines
  Added in v.1.737

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