summary refs log tree commit diff stats
diff options
context:
space:
mode:
authorAlan Pearce2017-02-07 15:40:32 +0100
committerAlan Pearce2017-02-07 15:40:32 +0100
commitfd0c985d2c2b1f653956dfe8d8633f5165f661ad (patch)
treea4d7be480eb10634d95fb0f439da3827b8f702d9
parent53128ff702dc1e3d90f2f5eecca505d9eb360230 (diff)
downloaddotfiles-fd0c985d2c2b1f653956dfe8d8633f5165f661ad.tar.lz
dotfiles-fd0c985d2c2b1f653956dfe8d8633f5165f661ad.tar.zst
dotfiles-fd0c985d2c2b1f653956dfe8d8633f5165f661ad.zip
Emacs: Fix called-interactively-p warnings
-rw-r--r--tag-emacs/emacs.d/init.org4
1 files changed, 2 insertions, 2 deletions
diff --git a/tag-emacs/emacs.d/init.org b/tag-emacs/emacs.d/init.org
index bb9486e..502c7cd 100644
--- a/tag-emacs/emacs.d/init.org
+++ b/tag-emacs/emacs.d/init.org
@@ -151,13 +151,13 @@ Let’s try a basic theme.
             (defun show-mode-line ()
               (interactive)
               (setq mode-line-format mode-line-default-format)
-              (when (called-interactively-p)
+              (when (called-interactively-p 'interactive)
                 (setq-default mode-line-format mode-line-default-format)
                 (setq mode-line-default-hidden nil)))
             (defun hide-mode-line ()
               (interactive)
               (setq mode-line-format nil)
-              (when (called-interactively-p)
+              (when (called-interactively-p 'interactive)
                 (setq-default mode-line-format nil)
                 (setq mode-line-default-hidden t)))