diff options
| author | Juanma Barranquero <lekktu@gmail.com> | 2009-10-02 03:48:36 +0000 |
|---|---|---|
| committer | Juanma Barranquero <lekktu@gmail.com> | 2009-10-02 03:48:36 +0000 |
| commit | 32226619c5e563c384372b566000e5d37d783a61 (patch) | |
| tree | 216af4221d2ba868b45162679ce3a0462985c422 /lisp/newcomment.el | |
| parent | 12a3c28c787e23801f40ea557a5c00b538968a52 (diff) | |
| download | emacs-32226619c5e563c384372b566000e5d37d783a61.tar.gz | |
Use `called-interactively-p' instead of `interactive-p'.
Diffstat (limited to 'lisp/newcomment.el')
| -rw-r--r-- | lisp/newcomment.el | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/newcomment.el b/lisp/newcomment.el index c7ad8821b6f..e1c257ccc54 100644 --- a/lisp/newcomment.el +++ b/lisp/newcomment.el @@ -1236,7 +1236,7 @@ if we're not inside a comment." (buffer-substring (point) (progn (move-to-left-margin) (point))))))))))))) - + ;;;###autoload (defun comment-indent-new-line (&optional soft) @@ -1260,7 +1260,7 @@ unless optional argument SOFT is non-nil." ;; don't do anything (unless no comment syntax is defined). (unless (and comment-start comment-auto-fill-only-comments - (not (interactive-p)) + (not (called-interactively-p 'interactive)) (not (save-excursion (prog1 (setq compos (comment-beginning)) (setq comin (point)))))) |