From fd0c985d2c2b1f653956dfe8d8633f5165f661ad Mon Sep 17 00:00:00 2001 From: Alan Pearce Date: Tue, 7 Feb 2017 15:40:32 +0100 Subject: Emacs: Fix called-interactively-p warnings --- tag-emacs/emacs.d/init.org | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) (limited to 'tag-emacs') 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))) -- cgit 1.4.1