# HG changeset patch # User John Paul Wallington # Date 1210814346 0 # Node ID 797fdc65182a757a396cc4ec0b3c4cc4a242fb27 # Parent e2f05c17ddad0d74dec24dd31a7794652cd9d32e (diff-current-defun): Use `buffer-local-value'. diff -r e2f05c17ddad -r 797fdc65182a lisp/diff-mode.el --- a/lisp/diff-mode.el Thu May 15 01:16:52 2008 +0000 +++ b/lisp/diff-mode.el Thu May 15 01:19:06 2008 +0000 @@ -1717,7 +1717,7 @@ (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