Skip to content

GitLab

Commit 986d19df authored by Chong Yidong's avatar Chong Yidong
Browse files

Add minor comment (Bug#7001).

parent f3fd95db
Hide whitespace changes
Inline Side-by-side
Showing with 4 additions and 3 deletions
lisp/emacs-lisp/bytecomp.el
View file @ 986d19df
...@@ -1801,12 +1801,13 @@ With argument ARG, insert value in current buffer after the form." ...@@ -1801,12 +1801,13 @@ With argument ARG, insert value in current buffer after the form."
(erase-buffer) (erase-buffer)
;; (emacs-lisp-mode) ;; (emacs-lisp-mode)
(setq case-fold-search nil) (setq case-fold-search nil)
;; This is a kludge. Some operating systems (OS/2, DOS) need to ;; This is a kludge. Some operating systems (OS/2, DOS) need
;; write files containing binary information specially. ;; to write files containing binary information specially.
;; Under most circumstances, such files will be in binary ;; Under most circumstances, such files will be in binary
;; overwrite mode, so those OS's use that flag to guess how ;; overwrite mode, so those OS's use that flag to guess how
;; they should write their data. Advise them that .elc files ;; they should write their data. Advise them that .elc files
;; need to be written carefully. ;; need to be written carefully. (There's no point running the
;; mode hook, so don't call `binary-overwrite-mode'.)
(setq overwrite-mode 'overwrite-mode-binary)) (setq overwrite-mode 'overwrite-mode-binary))
(displaying-byte-compile-warnings (displaying-byte-compile-warnings
(with-current-buffer bytecomp-inbuffer (with-current-buffer bytecomp-inbuffer
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment