changeset 13600:4c8f65a17dc9

(save-place-to-alist): Handle hexl-mode specially.
author Richard M. Stallman <rms@gnu.org>
date Mon, 20 Nov 1995 05:39:19 +0000
parents 4bb7e84fec15
children 0a091134e047
files lisp/saveplace.el
diffstat 1 files changed, 4 insertions(+), 1 deletions(-) [+]
line wrap: on
line diff
--- a/lisp/saveplace.el	Mon Nov 20 05:33:16 1995 +0000
+++ b/lisp/saveplace.el	Mon Nov 20 05:39:19 1995 +0000
@@ -107,7 +107,10 @@
               (setq save-place-alist (delq cell save-place-alist))))
         (if save-place
             (setq save-place-alist
-                  (cons (cons buffer-file-name (point))
+                  (cons (cons buffer-file-name
+			      (if (not (eq major-mode 'hexl-mode))
+				  (point)
+				(1+ (hexl-current-address))))
                         save-place-alist))))))
 
 (defun save-place-alist-to-file ()