HCoop
/
bpt
/
emacs.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
e94492d
)
don't use function-equal in nadvice
author
Robin Templeton
<robin@terpri.org>
Sun, 21 Sep 2014 07:55:11 +0000
(
03:55
-0400)
committer
Robin Templeton
<robin@terpri.org>
Mon, 20 Apr 2015 04:29:03 +0000
(
00:29
-0400)
* lisp/emacs-lisp/nadvice.el (advice--set-buffer-local): Use `equal'
instead of `function-equal'.
lisp/emacs-lisp/nadvice.el
patch
|
blob
|
blame
|
history
diff --git
a/lisp/emacs-lisp/nadvice.el
b/lisp/emacs-lisp/nadvice.el
index
aac0246
..
02535ea
100644
(file)
--- a/
lisp/emacs-lisp/nadvice.el
+++ b/
lisp/emacs-lisp/nadvice.el
@@
-242,7
+242,7
@@
them, we keep a sample here against which to compare. Each instance is
different, but `function-equal' will hopefully ignore those differences.")
(defun advice--set-buffer-local (var val)
- (if (
function-
equal val advice--buffer-local-function-sample)
+ (if (equal val advice--buffer-local-function-sample)
(kill-local-variable var)
(set (make-local-variable var) val)))