(edebug-eval-defun): Remove unnecessary quotes.

2 files changed, 16 insertions, 1 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 4f1a5a4a8be..f59e864f2e1 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,18 @@
+2005-07-04  Juri Linkov  <juri@jurta.org>
+
+        * faces.el (read-face-name): Put the code for getting a face name
+        from the buffer before adding the faces from the `face' property.
+        Use `completing-read-multiple' instead of `completing-read'.
+        Require `crm'.  Add default value and post-process the returned
+        list of faces.
+
+        * emacs-lisp/crm.el (crm-find-current-element)
+        (crm-minibuffer-complete-and-exit): Handle minibuffer prompt.
+
+        * emacs-lisp/lisp-mode.el (eval-defun-1):
+        * emacs-lisp/edebug.el (edebug-eval-defun):
+        Remove unnecessary quotes.
+
 2005-07-04  Juanma Barranquero  <lekktu@gmail.com>
 
         * emacs-lisp/cl-indent.el (lisp-indent-maximum-backtracking):
diff --git a/lisp/emacs-lisp/edebug.el b/lisp/emacs-lisp/edebug.el
index ebe375088a3..e998fdd7abc 100644
--- a/lisp/emacs-lisp/edebug.el
+++ b/lisp/emacs-lisp/edebug.el
@@ -519,7 +519,7 @@ the minibuffer."
                                 (put ',(nth 1 form) 'saved-face
                                      ',(get (nth 1 form) 'saved-face))
                                 (put ',(nth 1 form) 'customized-face
-                                     ',(nth 2 form)))
+                                     ,(nth 2 form)))
                         (put (nth 1 form) 'saved-face nil)))))
     (setq edebug-result (eval form))
     (if (not edebugging)