bug#13212: 24.2.90; setf (symbol-function ...) does not set buffer local variable if present

[Stefan Monnier]

tags 13212 notabug
thanks

> (make-local-variable 'cons)
> (setf (symbol-function 'cons) (lambda (x y) (+ x y)))

buffer-local variables affect only variables, not functions.
I.e. they affect symbol-value, not symbol-function.  Elisp does not provide
buffer-local functions, so you have to use things like
(if (derived-mode-p 'foo-mode) ...) instead.
An alternative is:

   (defvar-local my-foo-function (lambda () (some (default) behavior)))

   (defun my-foo ()
     (funcall my-foo-function))


-- Stefan