Mercurial > hg > xemacs-beta

comparison lisp/menubar-items.el @ 732:b9b8621c2439

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2002-01-22 14:16:38 by youngs] 2002-01-14 Björn Torkelsson <torkel@pdc.kth.se> * menubar-items.el (default-menubar): Open URLs menubar entries moved to mail-lib 2002-01-16 John Paul Wallington <jpw@shootybangbang.com> * cus-start.el: customize the builtin variable 'modifier-keys-sticky-time'. 2002-01-09 John Paul Wallington <jpw@shootybangbang.com> * help.el (describe-mode): synched with FSF 19.34; handle nil minor mode indicators.
author youngs
date Tue, 22 Jan 2002 14:16:39 +0000
parents 6b890cfde2b1
children 943eaba38521
comparison
equal deleted inserted replaced
731:46d76bae9921 732:b9b8621c2439
896 (customize-set-variable 'smtpmail-debug-info 896 (customize-set-variable 'smtpmail-debug-info
897 (not smtpmail-debug-info))) 897 (not smtpmail-debug-info)))
898 :style toggle 898 :style toggle
899 :selected (and (boundp 'smtpmail-debug-info) smtpmail-debug-info) 899 :selected (and (boundp 'smtpmail-debug-info) smtpmail-debug-info)
900 :active (and (boundp 'send-mail-function) 900 :active (and (boundp 'send-mail-function)
901 (eq send-mail-function 'smtpmail-send-it))] 901 (eq send-mail-function 'smtpmail-send-it))])
902 "---"
903 ("%_Open URLs With"
904 ["%_Emacs-W3"
905 (customize-set-variable 'browse-url-browser-function 'browse-url-w3)
906 :style radio
907 :selected (and (boundp 'browse-url-browser-function)
908 (eq browse-url-browser-function 'browse-url-w3))
909 :active (and (boundp 'browse-url-browser-function)
910 (fboundp 'browse-url-w3)
911 (fboundp 'w3-fetch))]
912 ["%_Netscape"
913 (customize-set-variable 'browse-url-browser-function
914 'browse-url-netscape)
915 :style radio
916 :selected (and (boundp 'browse-url-browser-function)
917 (eq browse-url-browser-function 'browse-url-netscape))
918 :active (and (boundp 'browse-url-browser-function)
919 (fboundp 'browse-url-netscape))]
920 ["%_Mosaic"
921 (customize-set-variable 'browse-url-browser-function
922 'browse-url-mosaic)
923 :style radio
924 :selected (and (boundp 'browse-url-browser-function)
925 (eq browse-url-browser-function 'browse-url-mosaic))
926 :active (and (boundp 'browse-url-browser-function)
927 (fboundp 'browse-url-mosaic))]
928 ["Mosaic (%_CCI)"
929 (customize-set-variable 'browse-url-browser-function 'browse-url-cci)
930 :style radio
931 :selected (and (boundp 'browse-url-browser-function)
932 (eq browse-url-browser-function 'browse-url-cci))
933 :active (and (boundp 'browse-url-browser-function)
934 (fboundp 'browse-url-cci))]
935 ["%_IXI Mosaic"
936 (customize-set-variable 'browse-url-browser-function
937 'browse-url-iximosaic)
938 :style radio
939 :selected (and (boundp 'browse-url-browser-function)
940 (eq browse-url-browser-function 'browse-url-iximosaic))
941 :active (and (boundp 'browse-url-browser-function)
942 (fboundp 'browse-url-iximosaic))]
943 ["%_Lynx (xterm)"
944 (customize-set-variable 'browse-url-browser-function
945 'browse-url-lynx-xterm)
946 :style radio
947 :selected (and (boundp 'browse-url-browser-function)
948 (eq browse-url-browser-function 'browse-url-lynx-xterm))
949 :active (and (boundp 'browse-url-browser-function)
950 (fboundp 'browse-url-lynx-xterm))]
951 ["L%_ynx (xemacs)"
952 (customize-set-variable 'browse-url-browser-function
953 'browse-url-lynx-emacs)
954 :style radio
955 :selected (and (boundp 'browse-url-browser-function)
956 (eq browse-url-browser-function 'browse-url-lynx-emacs))
957 :active (and (boundp 'browse-url-browser-function)
958 (fboundp 'browse-url-lynx-emacs))]
959 ["%_Grail"
960 (customize-set-variable 'browse-url-browser-function
961 'browse-url-grail)
962 :style radio
963 :selected (and (boundp 'browse-url-browser-function)
964 (eq browse-url-browser-function 'browse-url-grail))
965 :active (and (boundp 'browse-url-browser-function)
966 (fboundp 'browse-url-grail))]
967 ["%_Kfm"
968 (customize-set-variable 'browse-url-browser-function
969 'browse-url-kfm)
970 :style radio
971 :selected (and (boundp 'browse-url-browser-function)
972 (eq browse-url-browser-function 'browse-url-kfm))
973 :active (and (boundp 'browse-url-browser-function)
974 (fboundp 'browse-url-kfm))]
975 ))
976 ("%_Troubleshooting" 902 ("%_Troubleshooting"
977 ["%_Debug on Error" 903 ["%_Debug on Error"
978 (customize-set-variable 'debug-on-error (not debug-on-error)) 904 (customize-set-variable 'debug-on-error (not debug-on-error))
979 :style toggle :selected debug-on-error] 905 :style toggle :selected debug-on-error]
980 ["Debug on %_Quit" 906 ["Debug on %_Quit"