emacs-elpa-diffs
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

[elpa] externals/smalltalk-mode 90f07e6 32/34: Move smalltalk-mode autol


From: Stefan Monnier
Subject: [elpa] externals/smalltalk-mode 90f07e6 32/34: Move smalltalk-mode autoloads to smalltalk-mode
Date: Tue, 9 Apr 2019 22:30:48 -0400 (EDT)

branch: externals/smalltalk-mode
commit 90f07e67240d927097000e53b492fc94704e902b
Author: Wilfred Hughes <address@hidden>
Commit: Holger Hans Peter Freyther <address@hidden>

    Move smalltalk-mode autoloads to smalltalk-mode
    
    This makes smalltalk-mode.el self-contained and useful as a standalone
    file.
---
 smalltalk-mode-init.el.in | 3 ---
 smalltalk-mode.el         | 4 ++++
 2 files changed, 4 insertions(+), 3 deletions(-)

diff --git a/smalltalk-mode-init.el.in b/smalltalk-mode-init.el.in
index 0fc6321..a2dbef9 100644
--- a/smalltalk-mode-init.el.in
+++ b/smalltalk-mode-init.el.in
@@ -11,12 +11,9 @@
                     (throw 'archive-mode (cdr mode-assoc))))))
       auto-mode-alist)
 
-(push '("\\.st\\'" . smalltalk-mode) auto-mode-alist)
-
 (if (boundp 'inhibit-local-variables-regexps)
     (push "\\.star\\'" inhibit-local-variables-regexps)
     (push "\\.star\\'" inhibit-first-line-modes-regexp))
 
-(autoload 'smalltalk-mode "@lispdir@/smalltalk-mode.elc" "" t)
 @WITH_EMACS_COMINT_TRUE@(autoload 'gst "@lispdir@/gst-mode.elc" "" t)
 
diff --git a/smalltalk-mode.el b/smalltalk-mode.el
index c44c7a1..d8a1d02 100644
--- a/smalltalk-mode.el
+++ b/smalltalk-mode.el
@@ -179,6 +179,7 @@
 
 ;; ---[ Interactive functions ]---------------------------------------
 
+;;;###autoload
 (defun smalltalk-mode ()
   "Major mode for editing Smalltalk code.
 
@@ -227,6 +228,9 @@ Commands:
   ;; Run hooks, must be last
   (run-hooks 'smalltalk-mode-hook))
 
+;;;###autoload
+(add-to-list 'auto-mode-alist '("\\.st\\'" . smalltalk-mode))
+
 (defun smalltalk-tab ()
   (interactive)
   (let (col)



reply via email to

[Prev in Thread] Current Thread [Next in Thread]