# HG changeset patch # User Andreas Roehler # Date 1254937362 -7200 # Node ID a46d7513a3643b27fafe593bf269cccb6fd08423 # Parent 98588626568648e908b839d17e463ef0cb65c106 `beginning-of-defun-function', `end-of-defun-function' made buffer-local. Setting it globally would make the default unreachable. diff -r 985886265686 -r a46d7513a364 lisp/ChangeLog --- a/lisp/ChangeLog Tue Oct 06 22:39:30 2009 -0400 +++ b/lisp/ChangeLog Wed Oct 07 19:42:42 2009 +0200 @@ -1,3 +1,10 @@ +2009-10-07 Andreas Roehler + + * lisp.el (beginning-of-defun-function): + make variable buffer local + * lisp.el (end-of-defun-function): + make variable buffer local + 2009-10-05 Jerry James * gnome.el: Add GPL v2 or later notice with explicit permission of diff -r 985886265686 -r a46d7513a364 lisp/lisp.el --- a/lisp/lisp.el Tue Oct 06 22:39:30 2009 -0400 +++ b/lisp/lisp.el Wed Oct 07 19:42:42 2009 +0200 @@ -163,12 +163,14 @@ normal recipe (see `beginning-of-defun'). Modes can define this if defining `defun-prompt-regexp' is not sufficient to handle the mode's needs.") +(make-variable-buffer-local 'beginning-of-defun-function) (defvar end-of-defun-function nil "If non-nil, function for `end-of-defun' to call. This is used to find the end of the defun instead of using the normal recipe (see `end-of-defun'). Modes can define this if the normal method is not appropriate.") +(make-variable-buffer-local 'end-of-defun-function) (defun beginning-of-defun (&optional arg) "Move backward to the beginning of a defun.