(diff-current-defun): Use `buffer-local-value'.

This commit is contained in:
John Paul Wallington 2008-05-15 01:22:40 +00:00
parent 3516a0187c
commit 337f393eb4
2 changed files with 14 additions and 1 deletions

View file

@ -1717,7 +1717,7 @@ For use in `add-log-current-defun-function'."
(let ((old (if switched dst src)))
(with-temp-buffer
(insert (car old))
(funcall (with-current-buffer buf major-mode))
(funcall (buffer-local-value 'major-mode buf))
(goto-char (+ (point-min) (cdr old)))
(add-log-current-defun))))
(with-current-buffer buf