Mercurial > emacs
changeset 37722:5d56786629e4
(hexl-current-address): Print a message when called
interactively.
| author | Gerd Moellmann <gerd@gnu.org> |
|---|---|
| date | Mon, 14 May 2001 13:17:30 +0000 |
| parents | 4a800a01388b |
| children | 419538da0f94 |
| files | lisp/hexl.el |
| diffstat | 1 files changed, 3 insertions(+), 1 deletions(-) [+] |
line wrap: on
line diff
--- a/lisp/hexl.el Mon May 14 13:03:23 2001 +0000 +++ b/lisp/hexl.el Mon May 14 13:17:30 2001 +0000 @@ -1,6 +1,6 @@ ;;; hexl.el --- edit a file in a hex dump format using the hexl filter. -;; Copyright (C) 1989, 1994, 1998 Free Software Foundation, Inc. +;; Copyright (C) 1989, 1994, 1998, 2001 Free Software Foundation, Inc. ;; Author: Keith Gabryelski <ag@wheaties.ai.mit.edu> ;; Maintainer: FSF @@ -347,6 +347,8 @@ (if (>= current-column 41) (- current-column 41) (/ (- current-column (/ current-column 5)) 2)))) + (when (interactive-p) + (message "Current address is %d" hexl-address)) hexl-address)) (defun hexl-address-to-marker (address)