# HG changeset patch
# User Eli Zaretskii <eliz@gnu.org>
# Date 1010842033 0
# Node ID e6ab8b412ffccbdacfc8fd484cf98519746a2f99
# Parent  3cc44ee4b8cde99b3851a978bb65a6d2d6752b2c
(find-file-noselect): Don't consider a buffer as
visiting a file literally if it is in hexl-mode.

diff -r 3cc44ee4b8cd -r e6ab8b412ffc lisp/files.el
--- a/lisp/files.el	Sat Jan 12 12:18:11 2002 +0000
+++ b/lisp/files.el	Sat Jan 12 13:27:13 2002 +0000
@@ -1078,8 +1078,12 @@
 		      (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? "