Re: Obsolete functions or variables, multiple definitions

[martin rudalics]

>     `custom-quote' is still defined in cus-edit.el.  Compare
>
> If this is a bug, can you fix it?

Attached find a patch.

        * cus-edit.el (custom-quote): Remove here since this has been
        moved to custom.el.

=========================================================================
*** cus-edit.el Wed Feb  1 10:17:44 2006
--- cus-edit.el Sun Feb 26 18:11:40 2006
***************
*** 468,488 ****

  ;;; 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:
--- 468,473 ----
================================================================================