summaryrefslogtreecommitdiff
path: root/lisp/add-log.el
diff options
context:
space:
mode:
Diffstat (limited to 'lisp/add-log.el')
-rw-r--r--lisp/add-log.el4
1 files changed, 2 insertions, 2 deletions
diff --git a/lisp/add-log.el b/lisp/add-log.el
index bb911904ad6..92ee80a4f70 100644
--- a/lisp/add-log.el
+++ b/lisp/add-log.el
@@ -591,8 +591,8 @@ Has a preference of looking backwards."
(condition-case nil
(save-excursion
(let ((location (point)))
- (cond ((functionp add-log-current-defun-function)
- (funcall add-log-current-defun-function))
+ (cond ((and (functionp add-log-current-defun-function)
+ (funcall add-log-current-defun-function)))
((memq major-mode add-log-lisp-like-modes)
;; If we are now precisely at the beginning of a defun,
;; make sure beginning-of-defun finds that one