From 33709261ef513e4f4b21bd7480bbc502963d0c56 Mon Sep 17 00:00:00 2001 From: Eli Zaretskii Date: Fri, 3 Mar 2006 12:23:29 +0000 Subject: [PATCH] (custom-quote): Remove function since it has been moved to custom.el. --- lisp/ChangeLog | 3 +++ lisp/cus-edit.el | 15 --------------- 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 + * 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: -- 2.39.5