Commit 05d1da31 authored by Alan Mackenzie's avatar Alan Mackenzie

(c-emacs-features): argumentative-bod-function: bind mark-ring to avoid

accumulating a spurious mark.
parent d8ff7692
......@@ -1444,7 +1444,8 @@ non-nil, a caret is prepended to invert the set."
;; beginning-of-defun-function. Assume end-of-defun does likewise.
(let ((beginning-of-defun-function
(lambda (&optional arg)
(not (eq arg nil)))))
(not (eq arg nil))))
mark-ring)
(save-excursion
(if (beginning-of-defun-raw 1)
(setq list (cons 'argumentative-bod-function list)))))
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment