# HG changeset patch # User Eli Zaretskii # Date 1141388549 0 # Node ID 901e5cda9c30a3873a722ce16da6763f6a9bf609 # Parent c3f3f618663b602e9c5eab1c78cbc1548266760a (custom-quote): Remove function since it has been moved to custom.el. diff -r c3f3f618663b -r 901e5cda9c30 lisp/cus-edit.el --- a/lisp/cus-edit.el Fri Mar 03 12:20:26 2006 +0000 +++ b/lisp/cus-edit.el Fri Mar 03 12:22:29 2006 +0000 @@ -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: