(find-file-noselect): Don't consider a buffer as

[bpt/emacs.git] / lisp / files.el

diff --git a/lisp/files.el b/lisp/files.el
index ff47462..8042707 100644 (file)
--- a/lisp/files.el
+++ b/lisp/files.el
@@ -1078,8 +1078,12 @@ that are visiting the various files."
                      (setq buffer-read-only read-only)))
                  (setq buffer-file-read-only read-only))
 
-               (when (not (eq (not (null rawfile))
-                              (not (null find-file-literally))))
+               (when (and (not (eq (not (null rawfile))
+                                   (not (null find-file-literally))))
+                          ;; It is confusing to ask whether to visit
+                          ;; non-literally if they have the file in
+                          ;; hexl-mode.
+                          (not (eq major-mode 'hexl-mode)))
                  (if (buffer-modified-p)
                      (if (y-or-n-p (if rawfile
                                        "Save file and revisit literally? "