From d03a0fb409bcd5dedd316d217bf6dc336f105139 Mon Sep 17 00:00:00 2001 From: Yasuyuki Oka Date: Sat, 28 Dec 2013 17:38:49 +0900 Subject: [PATCH 1/2] cmake-mode.el: Move header line to the top of file --- Auxiliary/cmake-mode.el | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/Auxiliary/cmake-mode.el b/Auxiliary/cmake-mode.el index 79d231961..902f7530c 100644 --- a/Auxiliary/cmake-mode.el +++ b/Auxiliary/cmake-mode.el @@ -1,3 +1,5 @@ +;;; cmake-mode.el --- major-mode for editing CMake sources + ;============================================================================= ; CMake - Cross Platform Makefile Generator ; Copyright 2000-2009 Kitware, Inc., Insight Software Consortium @@ -9,7 +11,6 @@ ; implied warranty of MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. ; See the License for more information. ;============================================================================= -;;; cmake-mode.el --- major-mode for editing CMake sources ;------------------------------------------------------------------------------ From 33fa10f6bcd15543845a9870bd1f0edee1b82acb Mon Sep 17 00:00:00 2001 From: Yasuyuki Oka Date: Sat, 28 Dec 2013 17:51:32 +0900 Subject: [PATCH 2/2] cmake-mode.el: Add autoload cookies --- Auxiliary/cmake-mode.el | 13 +++++++++---- 1 file changed, 9 insertions(+), 4 deletions(-) diff --git a/Auxiliary/cmake-mode.el b/Auxiliary/cmake-mode.el index 902f7530c..9c736472d 100644 --- a/Auxiliary/cmake-mode.el +++ b/Auxiliary/cmake-mode.el @@ -23,10 +23,6 @@ ;; ;; (setq load-path (cons (expand-file-name "/dir/with/cmake-mode") load-path)) ;; (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. ;; +;;;###autoload (defun cmake-mode () "Major mode for editing CMake listfiles." (interactive) @@ -270,6 +267,7 @@ the indentation. Otherwise it retains the same position on the line" ; Help mode starts here +;;;###autoload (defun cmake-command-run (type &optional topic) "Runs the command cmake with the arguments specified. The 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 () "Prints out a list of the cmake commands." (interactive) @@ -312,6 +311,7 @@ optional argument topic will be appended to the argument list." (defvar cmake-help-command-history nil "Topic read history.") (require 'thingatpt) +;;;###autoload (defun cmake-get-topic (type) "Gets the topic from the minibuffer input. The default is the word the cursor is on." (interactive) @@ -328,6 +328,7 @@ optional argument topic will be appended to the argument list." ) +;;;###autoload (defun cmake-help-command () "Prints out the help message corresponding to the command the cursor is on." (interactive) @@ -335,6 +336,10 @@ optional argument topic will be appended to the argument list." (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. (provide 'cmake-mode)