(custom-quote): Remove function since it has been moved to custom.el.

2 files changed, 3 insertions, 15 deletions

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 88bcf6f98c1..4eabd34743d 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,5 +1,8 @@
 2006-03-03  Martin Rudalics  <rudalics@gmx.at>
 
+        * cus-edit.el (custom-quote): Remove function, since it has been
+        moved to custom.el.
+
         * font-lock.el (lisp-font-lock-keywords-2)
         * emacs-lisp/rx.el (rx-check-any, rx-check-not)
         * generic-x.el (reg-generic-mode): Quote "]"s in regexps when
diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index feacc9adf0d..60705b30552 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -468,21 +468,6 @@
 
 ;;; Utilities.
 
-(defun custom-quote (sexp)
-  "Quote SEXP iff it is not self quoting."
-  (if (or (memq sexp '(t nil))
-          (keywordp sexp)
-          (and (listp sexp)
-               (memq (car sexp) '(lambda)))
-          (stringp sexp)
-          (numberp sexp)
-          (vectorp sexp)
-;;;       (and (fboundp 'characterp)
-;;;            (characterp sexp))
-          )
-      sexp
-    (list 'quote sexp)))
-
 (defun custom-split-regexp-maybe (regexp)
   "If REGEXP is a string, split it to a list at `\\|'.
 You can get the original back with from the result with: