Better autoloads

Add autoloads which will cause whole sclang package to be loaded.
This commit is contained in:
John Andrews 2021-08-16 20:33:05 -04:00
parent 19dfecc8ca
commit 8503b2a3e2
4 changed files with 15 additions and 18 deletions

View file

@ -302,6 +302,7 @@ If EOB-P is non-nil, positions cursor at end of buffer."
(list "-s")) (list "-s"))
(list "-iscel")))) (list "-iscel"))))
;;;###autoload (autoload 'sclang-start "sclang" "Start SuperCollider process." t)
(defun sclang-start () (defun sclang-start ()
"Start SuperCollider process." "Start SuperCollider process."
(interactive) (interactive)

View file

@ -669,7 +669,7 @@ Returns the column to indent to."
:group 'sclang-mode :group 'sclang-mode
:type 'hook) :type 'hook)
;;;###autoload ;;;###autoload (autoload 'sclang-mode "sclang" "Major mode for editing SuperCollider language" t)
(define-derived-mode sclang-mode prog-mode "SCLang" (define-derived-mode sclang-mode prog-mode "SCLang"
"Major mode for editing SuperCollider language code. "Major mode for editing SuperCollider language code.
\\{sclang-mode-map}" \\{sclang-mode-map}"

View file

@ -1,3 +1,5 @@
;;; package: sclang-util --- Utility helpers for sclang
;;
;; copyright 2003-2005 stefan kersten <steve@k-hornz.de> ;; copyright 2003-2005 stefan kersten <steve@k-hornz.de>
;; ;;
;; This program is free software; you can redistribute it and/or ;; This program is free software; you can redistribute it and/or
@ -83,4 +85,4 @@
(provide 'sclang-util) (provide 'sclang-util)
;; EOF ;;; sclang-util.el ends here

View file

@ -55,12 +55,6 @@
(interactive) (interactive)
(customize-group 'sclang)) (customize-group 'sclang))
(eval-and-compile
(let ((load-path
(if (and (boundp 'byte-compile-dest-file)
(stringp byte-compile-dest-file))
(cons (file-name-directory byte-compile-dest-file) load-path)
load-path)))
(require 'sclang-util) (require 'sclang-util)
(require 'sclang-browser) (require 'sclang-browser)
(require 'sclang-interp) (require 'sclang-interp)
@ -70,7 +64,7 @@
(require 'sclang-minor-mode) (require 'sclang-minor-mode)
(require 'sclang-help) (require 'sclang-help)
(require 'sclang-server) (require 'sclang-server)
(require 'sclang-widgets))) (require 'sclang-widgets)
(provide 'sclang) (provide 'sclang)