cmake-mode.el: Add autoload cookies

This commit is contained in:
Yasuyuki Oka 2013-12-28 17:51:32 +09:00 committed by Brad King
parent d03a0fb409
commit 33fa10f6bc
1 changed files with 9 additions and 4 deletions

View File

@ -23,10 +23,6 @@
;; ;;
;; (setq load-path (cons (expand-file-name "/dir/with/cmake-mode") load-path)) ;; (setq load-path (cons (expand-file-name "/dir/with/cmake-mode") load-path))
;; (require 'cmake-mode) ;; (require 'cmake-mode)
;; (setq auto-mode-alist
;; (append '(("CMakeLists\\.txt\\'" . cmake-mode)
;; ("\\.cmake\\'" . cmake-mode))
;; auto-mode-alist))
;------------------------------------------------------------------------------ ;------------------------------------------------------------------------------
@ -236,6 +232,7 @@ the indentation. Otherwise it retains the same position on the line"
;; ;;
;; CMake mode startup function. ;; CMake mode startup function.
;; ;;
;;;###autoload
(defun cmake-mode () (defun cmake-mode ()
"Major mode for editing CMake listfiles." "Major mode for editing CMake listfiles."
(interactive) (interactive)
@ -270,6 +267,7 @@ the indentation. Otherwise it retains the same position on the line"
; Help mode starts here ; Help mode starts here
;;;###autoload
(defun cmake-command-run (type &optional topic) (defun cmake-command-run (type &optional topic)
"Runs the command cmake with the arguments specified. The "Runs the command cmake with the arguments specified. The
optional argument topic will be appended to the argument list." optional argument topic will be appended to the argument list."
@ -303,6 +301,7 @@ optional argument topic will be appended to the argument list."
) )
) )
;;;###autoload
(defun cmake-help-list-commands () (defun cmake-help-list-commands ()
"Prints out a list of the cmake commands." "Prints out a list of the cmake commands."
(interactive) (interactive)
@ -312,6 +311,7 @@ optional argument topic will be appended to the argument list."
(defvar cmake-help-command-history nil "Topic read history.") (defvar cmake-help-command-history nil "Topic read history.")
(require 'thingatpt) (require 'thingatpt)
;;;###autoload
(defun cmake-get-topic (type) (defun cmake-get-topic (type)
"Gets the topic from the minibuffer input. The default is the word the cursor is on." "Gets the topic from the minibuffer input. The default is the word the cursor is on."
(interactive) (interactive)
@ -328,6 +328,7 @@ optional argument topic will be appended to the argument list."
) )
;;;###autoload
(defun cmake-help-command () (defun cmake-help-command ()
"Prints out the help message corresponding to the command the cursor is on." "Prints out the help message corresponding to the command the cursor is on."
(interactive) (interactive)
@ -335,6 +336,10 @@ optional argument topic will be appended to the argument list."
(cmake-command-run "--help-command" (downcase command)) (cmake-command-run "--help-command" (downcase command))
) )
;;;###autoload
(progn
(add-to-list 'auto-mode-alist '("CMakeLists\\.txt\\'" . cmake-mode))
(add-to-list 'auto-mode-alist '("\\.cmake\\'" . cmake-mode)))
; This file provides cmake-mode. ; This file provides cmake-mode.
(provide 'cmake-mode) (provide 'cmake-mode)