# HG changeset patch
# User Chong Yidong <cyd@stupidchicken.com>
# Date 1286080319 14400
# Node ID 36370937dd5f5136c3c761b3b969de7c11867552
# Parent  3ccf1931ae33ad9fab49e8de9b08c74d016d2f0b
Remove obsolete use of binary-overwrite-mode in bytecomp (Bug#7001).

* emacs-lisp/bytecomp.el (byte-compile-from-buffer): Remove
obsolete use of binary-overwrite-mode (Bug#7001).

diff -r 3ccf1931ae33 -r 36370937dd5f lisp/ChangeLog
--- a/lisp/ChangeLog	Sun Oct 03 06:12:15 2010 +0200
+++ b/lisp/ChangeLog	Sun Oct 03 00:31:59 2010 -0400
@@ -1,3 +1,8 @@
+2010-10-03  Chong Yidong  <cyd@stupidchicken.com>
+
+	* emacs-lisp/bytecomp.el (byte-compile-from-buffer): Remove
+	obsolete use of binary-overwrite-mode (Bug#7001).
+
 2010-10-03  Glenn Morris  <rgm@gnu.org>
 
 	* obsolete/x-menu.el: Remove file, obsolete since 21.1
diff -r 3ccf1931ae33 -r 36370937dd5f lisp/emacs-lisp/bytecomp.el
--- a/lisp/emacs-lisp/bytecomp.el	Sun Oct 03 06:12:15 2010 +0200
+++ b/lisp/emacs-lisp/bytecomp.el	Sun Oct 03 00:31:59 2010 -0400
@@ -1800,15 +1800,7 @@
        (set-buffer-multibyte t)
        (erase-buffer)
        ;;	 (emacs-lisp-mode)
-       (setq case-fold-search nil)
-       ;; This is a kludge.  Some operating systems (OS/2, DOS) need
-       ;; to write files containing binary information specially.
-       ;; Under most circumstances, such files will be in binary
-       ;; overwrite mode, so those OS's use that flag to guess how
-       ;; they should write their data.  Advise them that .elc files
-       ;; 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 case-fold-search nil))
      (displaying-byte-compile-warnings
       (with-current-buffer bytecomp-inbuffer
 	(and bytecomp-filename