aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorRichard M. Stallman1998-04-23 21:57:25 +0000
committerRichard M. Stallman1998-04-23 21:57:25 +0000
commitba74e83386aef63dad42f060a0f4c61570b8034c (patch)
treec2f415c9a52c38f5759bf905b18c7695d6783e83
parent9fc0913c1018fbfdc0009013b58745de4fa5726d (diff)
downloademacs-ba74e83386aef63dad42f060a0f4c61570b8034c.tar.gz
emacs-ba74e83386aef63dad42f060a0f4c61570b8034c.zip
(load-with-code-conversion): Don't pass extra arg to eval-buffer.
(set-auto-coding): Doc fix.
-rw-r--r--lisp/international/mule.el5
1 files changed, 3 insertions, 2 deletions
diff --git a/lisp/international/mule.el b/lisp/international/mule.el
index 47c5816fc0f..82d9cbcddc9 100644
--- a/lisp/international/mule.el
+++ b/lisp/international/mule.el
@@ -75,7 +75,8 @@ Return t if file exists."
75 ;; If this Emacs is running with --unibyte, 75 ;; If this Emacs is running with --unibyte,
76 ;; convert multibyte strings to unibyte 76 ;; convert multibyte strings to unibyte
77 ;; after reading them. 77 ;; after reading them.
78 (not default-enable-multibyte-characters))) 78;; (not default-enable-multibyte-characters)
79 ))
79 (let (kill-buffer-hook kill-buffer-query-functions) 80 (let (kill-buffer-hook kill-buffer-query-functions)
80 (kill-buffer buffer))) 81 (kill-buffer buffer)))
81 (let ((hook (assoc file after-load-alist))) 82 (let ((hook (assoc file after-load-alist)))
@@ -772,7 +773,7 @@ in the tailing 3K-byte oof STRING.
772The return value is the specified coding system, 773The return value is the specified coding system,
773or nil if nothing specified. 774or nil if nothing specified.
774 775
775The variable `auto-file-coding-system' (which see) is set to this 776The variable `set-auto-coding-function' (which see) is set to this
776function by default." 777function by default."
777 (condition-case nil 778 (condition-case nil
778 (let ((case-fold-search t) 779 (let ((case-fold-search t)