Mercurial > emacs
changeset 50424:0b8df17aac7e
(hexl-find-file): Ignore user's value of default-major-mode.
| author | Richard M. Stallman <rms@gnu.org> |
|---|---|
| date | Thu, 03 Apr 2003 23:01:12 +0000 |
| parents | e1c7e157854c |
| children | 5f447cd26b30 |
| files | lisp/hexl.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/hexl.el Thu Apr 03 23:00:22 2003 +0000 +++ b/lisp/hexl.el Thu Apr 03 23:01:12 2003 +0000 @@ -296,7 +296,9 @@ (list (let ((completion-ignored-extensions nil)) (read-file-name "Filename: " nil nil 'ret-must-match)))) - (find-file-literally filename) + ;; Ignore the user's setting of default-major-mode. + (let ((default-major-mode 'hexl-mode)) + (find-file-literally filename)) (if (not (eq major-mode 'hexl-mode)) (hexl-mode)))