emacs-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[Emacs-diffs] Changes to emacs/lisp/cus-edit.el


From: Stefan Monnier
Subject: [Emacs-diffs] Changes to emacs/lisp/cus-edit.el
Date: Fri, 30 Aug 2002 17:35:53 -0400

Index: emacs/lisp/cus-edit.el
diff -c emacs/lisp/cus-edit.el:1.158 emacs/lisp/cus-edit.el:1.159
*** emacs/lisp/cus-edit.el:1.158        Tue Jul 16 09:37:21 2002
--- emacs/lisp/cus-edit.el      Sat Jul 20 18:14:36 2002
***************
*** 2120,2125 ****
--- 2120,2126 ----
           (push (widget-create-child-and-convert
                  widget 'visibility
                  :help-echo "Show the value of this option."
+                 :off "Show Value"
                  :action 'custom-toggle-parent
                  nil)
                 buttons))
***************
*** 2137,2142 ****
--- 2138,2145 ----
             (push (widget-create-child-and-convert
                    widget 'visibility
                    :help-echo "Hide the value of this option."
+                   :on "Hide Value"
+                   :off "Show Value"
                    :action 'custom-toggle-parent
                    t)
                   buttons)
***************
*** 2171,2176 ****
--- 2174,2181 ----
             (push (widget-create-child-and-convert
                    widget 'visibility
                    :help-echo "Hide the value of this option."
+                   :on "Hide Value"
+                   :off "Show Value"
                    :action 'custom-toggle-parent
                    t)
                   buttons)
***************
*** 2193,2198 ****
--- 2198,2204 ----
        ;; this anyway. The doc string widget should be added like the others.
        ;; --dv
        (widget-put widget :buttons buttons)
+       (insert "\n")
        ;; Insert documentation.
        (widget-default-format-handler widget ?h)
  
***************
*** 2783,2788 ****
--- 2789,2796 ----
           (push (widget-create-child-and-convert
                  widget 'visibility
                  :help-echo "Hide or show this face."
+                 :on "Hide Face"
+                 :off "Show Face"
                  :action 'custom-toggle-parent
                  (not (eq state 'hidden)))
                 buttons)




reply via email to

[Prev in Thread] Current Thread [Next in Thread]