/[emacs]/emacs/lisp/hexl.el
ViewVC logotype

Diff of /emacs/lisp/hexl.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.72 by monnier, Mon Mar 4 01:13:52 2002 UTC revision 1.73 by miles, Tue Jul 9 06:00:05 2002 UTC
# Line 1  Line 1 
1  ;;; hexl.el --- edit a file in a hex dump format using the hexl filter  ;;; hexl.el --- edit a file in a hex dump format using the hexl filter
2    
3  ;; Copyright (C) 1989, 1994, 1998, 2001 Free Software Foundation, Inc.  ;; Copyright (C) 1989, 1994, 1998, 2001, 2002 Free Software Foundation, Inc.
4    
5  ;; Author: Keith Gabryelski <ag@wheaties.ai.mit.edu>  ;; Author: Keith Gabryelski <ag@wheaties.ai.mit.edu>
6  ;; Maintainer: FSF  ;; Maintainer: FSF
# Line 277  You can use \\[hexl-find-file] to visit Line 277  You can use \\[hexl-find-file] to visit
277  (defun hexl-find-file (filename)  (defun hexl-find-file (filename)
278    "Edit file FILENAME in hexl-mode.    "Edit file FILENAME in hexl-mode.
279  Switch to a buffer visiting file FILENAME, creating one in none exists."  Switch to a buffer visiting file FILENAME, creating one in none exists."
280    (interactive "fFilename: ")    (interactive
281       (list
282        (let ((completion-ignored-extensions nil))
283          (read-file-name "Filename: " nil nil 'ret-must-match))))
284    (find-file-literally filename)    (find-file-literally filename)
285    (if (not (eq major-mode 'hexl-mode))    (if (not (eq major-mode 'hexl-mode))
286        (hexl-mode)))        (hexl-mode)))

Legend:
Removed from v.1.72  
changed lines
  Added in v.1.73

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26