[elpa] externals/sml-mode 6f9f11e 09/45: * sml-mode.el (sml-mode-variables): Set sml-prog-proc-descriptor here...

[Stefan Monnier]

branch: externals/sml-mode
commit 6f9f11e10c4cd4567adbe0e471a2a650df46bffe
Author: Stefan Monnier <monnier@iro.umontreal.ca>
Commit: Stefan Monnier <monnier@iro.umontreal.ca>

    * sml-mode.el (sml-mode-variables): Set sml-prog-proc-descriptor here...
    (sml-mode): ... instead of here.
---
 sml-mode.el | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/sml-mode.el b/sml-mode.el
index 3fa0966..1f65f6a 100644
--- a/sml-mode.el
+++ b/sml-mode.el
@@ -1227,7 +1227,6 @@ TAB file name completion, as in shell-mode, etc.."
 This mode runs `sml-mode-hook' just before exiting.
 See also (info \"(sml-mode)Top\").
 \\{sml-mode-map}"
-  (set (make-local-variable 'sml-prog-proc-descriptor) sml-pp-functions)
   (set (make-local-variable 'font-lock-defaults) sml-font-lock-defaults)
   (set (make-local-variable 'outline-regexp) sml-outline-regexp)
   (set (make-local-variable 'imenu-create-index-function)
@@ -1254,6 +1253,7 @@ See also (info \"(sml-mode)Top\").
   (sml-mode-variables))
 
 (defun sml-mode-variables ()
+  (set (make-local-variable 'sml-prog-proc-descriptor) sml-pp-functions)
   (set-syntax-table sml-mode-syntax-table)
   (setq local-abbrev-table sml-mode-abbrev-table)
   ;; Setup indentation and sexp-navigation.