Mercurial > emacs
changeset 46265:4eaf280a94e1
(hexl-find-file): Bind `completion-ignored-extensions' to nil when
prompting for a filename.
| author | Miles Bader <miles@gnu.org> |
|---|---|
| date | Tue, 09 Jul 2002 06:00:05 +0000 |
| parents | 5f6fed869030 |
| children | 105b91f16813 |
| files | lisp/hexl.el |
| diffstat | 1 files changed, 5 insertions(+), 2 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/hexl.el Tue Jul 09 02:42:06 2002 +0000 +++ b/lisp/hexl.el Tue Jul 09 06:00:05 2002 +0000 @@ -1,6 +1,6 @@ ;;; hexl.el --- edit a file in a hex dump format using the hexl filter -;; Copyright (C) 1989, 1994, 1998, 2001 Free Software Foundation, Inc. +;; Copyright (C) 1989, 1994, 1998, 2001, 2002 Free Software Foundation, Inc. ;; Author: Keith Gabryelski <ag@wheaties.ai.mit.edu> ;; Maintainer: FSF @@ -277,7 +277,10 @@ (defun hexl-find-file (filename) "Edit file FILENAME in hexl-mode. Switch to a buffer visiting file FILENAME, creating one in none exists." - (interactive "fFilename: ") + (interactive + (list + (let ((completion-ignored-extensions nil)) + (read-file-name "Filename: " nil nil 'ret-must-match)))) (find-file-literally filename) (if (not (eq major-mode 'hexl-mode)) (hexl-mode)))