scop  committed 704639a

Sync with upstream <>.

  • Participants
  • Parent commits d019ead

Comments (0)

Files changed (3)

+2003-01-15  Ville Skyttä  <>
+	* sml-mode.texi: Sync with upstream.
 2003-01-13  Rendhalver [Peter Brown]  <>
 	* Makefile (VERSION): XEmacs package 0.06 released.
 VERSION = 0.06
 # It isn't really 3.9.5, but a version pulled from CVS 2002-08-01:
 #    cvs -d co sml-mode
+# In sync with upstream CVS as of 2003-01-15.
 MAINTAINER = XEmacs Development Team <>
 PACKAGE = sml-mode

File sml-mode.texi

 @end defvr
-@defvr Hook sml-load-hook
-Default: @code{nil}
-Another, maybe better, place for key bindings. This hook is only run when
-SML mode is loaded into Emacs. @xref{Configuration}.
-@end defvr
 @c ========================================================= INDENTATION
 @node Indentation, Magic Insertion, Basics, SML Mode
 @end defvr
-@defvr Hook inferior-sml-load-hook
-Default: @code{nil}
-This hook is analogous to @code{sml-load-hook} and is run just after the
-code for @code{inferior-sml-mode} is loaded into Emacs. Use this to set
-process defaults, and preferred key bindings for the interaction buffer.
-@end defvr
 @deffn Command switch-to-sml
 Key: @kbd{C-c C-s}
 @kindex @kbd{C-c C-s}
 are global (variables):
-(defun my-sml-load-hook () "Global defaults for SML mode"
-  (define-key   sml-mode-map "\C-cd" 'sml-cd))
-(add-hook 'sml-load-hook 'my-sml-load-hook)
+(defun my-sml-mode-hook () "Global defaults for SML mode"
+  (define-key sml-mode-map "\C-cd" 'sml-cd))
+(add-hook 'sml-mode-hook 'my-sml-mode-hook)
 @end lisp
 This has the effect of binding @code{sml-cd} to the key @kbd{C-c d}.
 If you want the same behaviour from @kbd{C-c d} in the ML buffer:
-(defun my-inf-sml-load-hook () "Global defaults for inferior SML mode"
+(defun my-inf-sml-mode-hook () "Global defaults for inferior SML mode"
   (define-key inferior-sml-mode-map "\C-cd" 'sml-cd)
   ;; NB. for SML/NJ '96
   (setq sml-cd-command "OS.FileSys.chDir \"%s\""))
-(add-hook 'inferior-sml-load-hook 'my-inf-sml-load-hook)
+(add-hook 'inferior-sml-mode-hook 'my-inf-sml-mode-hook)
 @end lisp
 There is nothing to stop you rebuilding the entire keymap for
 to add @code{NAME} to @code{sml-forms-alist} permanently yourself:
-(defun my-sml-load-hook () "Global defaults for SML mode"
+(defun my-sml-mode-hook () "Global defaults for SML mode"
   ;; whatever else you do
   (add-to-list 'sml-forms-alist '("NAME" . FUNCTION)))
 @end lisp
 If you want to create templates like `case' that prompt for parameters
 you'll have to do some Lisp programming. The @code{skeleton} package is
 a good stating point.  Better yet, you can reuse the wrappers used by
-sml-mode itself in your sml-load-hook:
+sml-mode itself in your sml-mode-hook:
-(add-hook 'sml-load-hook
+(add-hook 'sml-mode-hook
   (lambda ()
     (sml-def-skeleton "case" "Case expr: "
       str " of" \n _ " => ")))