From 48f56596d5278bdd041d3929165b818630ced048 Mon Sep 17 00:00:00 2001 From: Gerd Moellmann Date: Mon, 14 May 2001 13:17:30 +0000 Subject: [PATCH] (hexl-current-address): Print a message when called interactively. --- lisp/hexl.el | 4 +++- 1 file changed, 3 insertions(+), 1 deletion(-) diff --git a/lisp/hexl.el b/lisp/hexl.el index a2ddded9fe3..f4f2d21c098 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el @@ -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 ;; Maintainer: FSF @@ -347,6 +347,8 @@ Ask the user for confirmation." (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) -- 2.39.2