Commit 9fe1108c authored by Richard M. Stallman's avatar Richard M. Stallman
Browse files

(load-with-code-conversion): Bind deactivate-mark.

parent 4aede2f2
......@@ -73,7 +73,9 @@ Return t if file exists."
(inhibit-file-name-operation nil))
(save-excursion
(set-buffer buffer)
(insert-file-contents fullname)
;; Don't let deactivate-mark remain set.
(let (deactivate-mark)
(insert-file-contents fullname))
;; If the loaded file was inserted with no-conversion or
;; raw-text coding system, make the buffer unibyte.
;; Otherwise, eval-buffer might try to interpret random
......
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