Diff of /sml/trunk/sml-mode/sml-defs.el

Parent Directory | Revision Log | Patch

	revision 881, Thu Jul 19 20:07:53 2001 UTC	revision 882, Thu Jul 19 20:11:12 2001 UTC
#	Line 74	Line 74
74	"The syntax table used in `sml-mode'.")	"The syntax table used in `sml-mode'.")
75
76
77	(easy-menu-define sml-mode-menu sml-mode-map "Menu used in sml-mode."	(easy-menu-define sml-mode-menu sml-mode-map "Menu used in `sml-mode'."
78	'("SML"	'("SML"
79	("Process"	("Process"
80	["Start default ML compiler" sml           (fboundp 'sml)]	["Start default ML compiler" sml           (fboundp 'sml)  t]
81	["-" nil nil]	["-" nil nil]
82	["run CM.make"             sml-make        (featurep 'sml-proc)]	["run CM.make"             sml-make        (featurep 'sml-proc)]
83	["load ML source file"     sml-load-file   (featurep 'sml-proc)]	["load ML source file"     sml-load-file   (featurep 'sml-proc)]
#	Line 111	Line 111
111	["SML mode help (brief)"       describe-mode t]	["SML mode help (brief)"       describe-mode t]
112	["SML mode *info*"             sml-mode-info t]	["SML mode *info*"             sml-mode-info t]
113	["-----" nil nil]	["-----" nil nil]
114	["Remove overlay"    (sml-error-overlay 'undo) ;:active (sml-overlay-active-p)	["Remove overlay"    (sml-error-overlay 'undo) t ;:active (sml-overlay-active-p)
115	]))	]))
116
117	;;; Make's sure they appear in the menu bar when sml-mode-map is active.	;; Make's sure they appear in the menu bar when sml-mode-map is active.
118	;; On the hook for XEmacs only -- see easy-menu-add in auc-menu.el.	;; On the hook for XEmacs only -- see easy-menu-add in auc-menu.el.
119	;; (defun sml-mode-menu-bar ()	;; (defun sml-mode-menu-bar ()
120	;;   "Make sure menus appear in the menu bar as well as under mouse 3."	;;   "Make sure menus appear in the menu bar as well as under mouse 3."

---

Colored Diff Long Colored Diff Unidiff Context Diff Side by Side

Legend: Removed from v.881   changed lines   Added in v.882

---

root@smlnj-gforge.cs.uchicago.edu	ViewVC Help
Powered by ViewVC 1.0.0