diff options
Diffstat (limited to 'lisp/emulation/tpu-extras.el')
| -rw-r--r-- | lisp/emulation/tpu-extras.el | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emulation/tpu-extras.el b/lisp/emulation/tpu-extras.el index e8b2fec3ad3..6d0823ceb75 100644 --- a/lisp/emulation/tpu-extras.el +++ b/lisp/emulation/tpu-extras.el @@ -436,7 +436,7 @@ A repeat count means scroll that many sections." (ad-enable-advice f 'around 'tpu-respect-bottom-scroll-margin) (ad-activate f)) ;; report scroll margin settings if running interactively - (and (interactive-p) + (and (called-interactively-p 'interactive) (message "Scroll margins set. Top = %s%%, Bottom = %s%%" tpu-top-scroll-margin tpu-bottom-scroll-margin))) |