[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
[Emacs-diffs] Changes to emacs/lisp/cus-edit.el
From: |
Richard M. Stallman |
Subject: |
[Emacs-diffs] Changes to emacs/lisp/cus-edit.el |
Date: |
Sat, 20 Jul 2002 18:14:37 -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)