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

diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 88bcf6f98c1a31f8db54e73a7a5e63ef9070b9a7..4eabd34743d7db05499cdd2c5b48691abd3f7825 100644 (file)
--- 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 feacc9adf0db1622ec1067ea761673d53cad3706..60705b3055292243c92ad2836024bb35cfbaba3c 100644 (file)
--- 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: