diff options
Diffstat (limited to 'lisp/hexl.el')
| -rw-r--r-- | lisp/hexl.el | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/lisp/hexl.el b/lisp/hexl.el index fa514a54002..1fe9aad66de 100644 --- a/lisp/hexl.el +++ b/lisp/hexl.el @@ -724,7 +724,8 @@ With prefix arg N, puts point N bytes of the way from the true beginning." (setq arg (if (null arg) (- (window-height) 1 - (if ruler-mode 1 0)) + (if ruler-mode 1 0) + next-screen-context-lines) (prefix-numeric-value arg))) (hexl-scroll-up (- arg))) @@ -735,7 +736,8 @@ If there's no byte at the target address, move to the first or last line." (setq arg (if (null arg) (- (window-height) 1 - (if ruler-mode 1 0)) + (if ruler-mode 1 0) + next-screen-context-lines) (prefix-numeric-value arg))) (let* ((movement (* arg 16)) (address (hexl-current-address)) |