summaryrefslogtreecommitdiff
path: root/lisp/emacs-lisp
diff options
context:
space:
mode:
authorStefan Monnier <monnier@iro.umontreal.ca>2012-06-12 14:10:34 -0400
committerStefan Monnier <monnier@iro.umontreal.ca>2012-06-12 14:10:34 -0400
commitad4d226cb8e04acf5063f343772dcb3ba950849e (patch)
tree95d94df07f9a2c38f4397a3043cab1cb40cae3a6 /lisp/emacs-lisp
parent5a6bd9b77338e1debe8e91c9973f270187929c9d (diff)
downloademacs-ad4d226cb8e04acf5063f343772dcb3ba950849e.tar.gz
emacs-ad4d226cb8e04acf5063f343772dcb3ba950849e.tar.bz2
emacs-ad4d226cb8e04acf5063f343772dcb3ba950849e.zip
* lisp/emacs-lisp/cl-macs.el (cl-remf): Fix error in recent
conversion to backquotes.
Diffstat (limited to 'lisp/emacs-lisp')
-rw-r--r--lisp/emacs-lisp/cl-macs.el2
1 files changed, 1 insertions, 1 deletions
diff --git a/lisp/emacs-lisp/cl-macs.el b/lisp/emacs-lisp/cl-macs.el
index 0b49563adff..bc90898ad00 100644
--- a/lisp/emacs-lisp/cl-macs.el
+++ b/lisp/emacs-lisp/cl-macs.el
@@ -2325,7 +2325,7 @@ The form returns true if TAG was found and removed, nil otherwise."
(if (eq ,ttag (car ,tval))
(progn ,(cl-setf-do-store (nth 1 method) `(cddr ,tval))
t)
- `(cl--do-remf ,tval ,ttag)))))
+ (cl--do-remf ,tval ,ttag)))))
;;;###autoload
(defmacro cl-shiftf (place &rest args)