(custom-face-display-set): Define if not defined.

(custom-buffer-create-internal): Refer to the Emacs manual.

1 files changed, 4 insertions, 1 deletions

diff --git a/lisp/cus-edit.el b/lisp/cus-edit.el
index cfd76c59c6f..1ff037d9b4d 100644
--- a/lisp/cus-edit.el
+++ b/lisp/cus-edit.el
@@ -37,6 +37,9 @@
 (require 'easymenu)
 (eval-when-compile (require 'cl))
 
+(or (fboundp 'custom-face-display-set)
+    (defalias 'custom-face-display-set 'face-spec-set))
+
 (condition-case nil
     (require 'cus-load)
   (error nil))
@@ -841,7 +844,7 @@ Push RET or click mouse-2 on the word ")
   (widget-create 'info-link 
                  :tag "help"
                  :help-echo "Read the online help."
-                 "(custom)The Customization Buffer")
+                 "(emacs)Easy Customization")
   (widget-insert " for more information.\n\n")
   (setq custom-options 
         (if (= (length options) 1)