From e2108a7b3edac754138368a0fc51b0160129253b Mon Sep 17 00:00:00 2001 From: David Aspinall Date: Thu, 13 Oct 2011 14:35:09 +0000 Subject: Patch from Tom Prince to fix Emacs 24 byte compilation (replace interactive-p with called-interactively-p) --- lib/scomint.el | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'lib') diff --git a/lib/scomint.el b/lib/scomint.el index 2859e499..af8df997 100644 --- a/lib/scomint.el +++ b/lib/scomint.el @@ -251,7 +251,7 @@ NO-NEWLINE is non-nil." (save-excursion (condition-case nil (goto-char - (if (interactive-p) scomint-last-input-end scomint-last-output-start)) + (if (called-interactively-p 'any) scomint-last-input-end scomint-last-output-start)) (error nil)) (while (re-search-forward "\r+$" pmark t) (replace-match "" t t))))) -- cgit v1.2.3