diff options
| author | Richard M. Stallman | 1997-07-27 19:50:06 +0000 |
|---|---|---|
| committer | Richard M. Stallman | 1997-07-27 19:50:06 +0000 |
| commit | c098c7f193e178d7b04263e09a968fc7a5e1e187 (patch) | |
| tree | 08ae1d30025528f385a7ab636b397de699b47642 | |
| parent | 61c4aaf86e54f3300e5b1ca9a71984ef390db53d (diff) | |
| download | emacs-c098c7f193e178d7b04263e09a968fc7a5e1e187.tar.gz emacs-c098c7f193e178d7b04263e09a968fc7a5e1e187.zip | |
Customized.
Doc fixes.
| -rw-r--r-- | lisp/progmodes/make-mode.el | 152 |
1 files changed, 98 insertions, 54 deletions
diff --git a/lisp/progmodes/make-mode.el b/lisp/progmodes/make-mode.el index 973fabeb0cd..f758cf191cb 100644 --- a/lisp/progmodes/make-mode.el +++ b/lisp/progmodes/make-mode.el | |||
| @@ -98,75 +98,108 @@ | |||
| 98 | ;;; Configurable stuff | 98 | ;;; Configurable stuff |
| 99 | ;;; ------------------------------------------------------------ | 99 | ;;; ------------------------------------------------------------ |
| 100 | 100 | ||
| 101 | (defvar makefile-browser-buffer-name "*Macros and Targets*" | 101 | (defgroup makefile nil |
| 102 | "Name of the macro- and target browser buffer.") | 102 | "Makefile editing commands for Emacs." |
| 103 | :group 'tools | ||
| 104 | :prefix "makefile-") | ||
| 103 | 105 | ||
| 104 | (defvar makefile-target-colon ":" | 106 | (defcustom makefile-browser-buffer-name "*Macros and Targets*" |
| 107 | "Name of the macro- and target browser buffer." | ||
| 108 | :type 'string | ||
| 109 | :group 'makefile) | ||
| 110 | |||
| 111 | (defcustom makefile-target-colon ":" | ||
| 105 | "String to append to all target names inserted by `makefile-insert-target'. | 112 | "String to append to all target names inserted by `makefile-insert-target'. |
| 106 | \":\" or \"::\" are common values.") | 113 | \":\" or \"::\" are common values." |
| 114 | :type 'string | ||
| 115 | :group 'makefile) | ||
| 107 | 116 | ||
| 108 | (defvar makefile-macro-assign " = " | 117 | (defcustom makefile-macro-assign " = " |
| 109 | "String to append to all macro names inserted by `makefile-insert-macro'. | 118 | "String to append to all macro names inserted by `makefile-insert-macro'. |
| 110 | The normal value should be \" = \", since this is what | 119 | The normal value should be \" = \", since this is what |
| 111 | standard make expects. However, newer makes such as dmake | 120 | standard make expects. However, newer makes such as dmake |
| 112 | allow a larger variety of different macro assignments, so you | 121 | allow a larger variety of different macro assignments, so you |
| 113 | might prefer to use \" += \" or \" := \" .") | 122 | might prefer to use \" += \" or \" := \" ." |
| 123 | :type 'string | ||
| 124 | :group 'makefile) | ||
| 114 | 125 | ||
| 115 | (defvar makefile-electric-keys nil | 126 | (defcustom makefile-electric-keys nil |
| 116 | "If non-nil, install electric keybindings. | 127 | "If non-nil, Makefile mode should install electric keybindings. |
| 117 | Default is nil.") | 128 | Default is nil." |
| 129 | :type 'boolean | ||
| 130 | :group 'makefile) | ||
| 118 | 131 | ||
| 119 | (defvar makefile-use-curly-braces-for-macros-p nil | 132 | (defcustom makefile-use-curly-braces-for-macros-p nil |
| 120 | "Controls the style of generated macro references. | 133 | "Controls the style of generated macro references. |
| 121 | t (actually non-nil) means macro references should use curly braces, | 134 | Non-nil means macro references should use curly braces, like `${this}'. |
| 122 | like `${this}'. | 135 | nil means use parentheses, like `$(this)'." |
| 123 | nil means use parentheses, like `$(this)'.") | 136 | :type 'boolean |
| 137 | :group 'makefile) | ||
| 124 | 138 | ||
| 125 | (defvar makefile-tab-after-target-colon t | 139 | (defcustom makefile-tab-after-target-colon t |
| 126 | "If non-nil, insert a TAB after a target colon. | 140 | "If non-nil, insert a TAB after a target colon. |
| 127 | Otherwise, a space is inserted. | 141 | Otherwise, a space is inserted. |
| 128 | The default is t.") | 142 | The default is t." |
| 129 | 143 | :type 'boolean | |
| 130 | (defvar makefile-browser-leftmost-column 10 | 144 | :group 'makefile) |
| 131 | "Number of blanks to the left of the browser selection mark.") | 145 | |
| 132 | 146 | (defcustom makefile-browser-leftmost-column 10 | |
| 133 | (defvar makefile-browser-cursor-column 10 | 147 | "Number of blanks to the left of the browser selection mark." |
| 134 | "Column in which the cursor is positioned when it moves | 148 | :type 'integer |
| 135 | up or down in the browser.") | 149 | :group 'makefile) |
| 136 | 150 | ||
| 137 | (defvar makefile-backslash-column 48 | 151 | (defcustom makefile-browser-cursor-column 10 |
| 138 | "*Column in which `makefile-backslash-region' inserts backslashes.") | 152 | "Column the cursor goes to when it moves up or down in the Makefile browser." |
| 139 | 153 | :type 'integer | |
| 140 | (defvar makefile-backslash-align t | 154 | :group 'makefile) |
| 141 | "If non-nil, `makefile-backslash-region' will align backslashes.") | 155 | |
| 142 | 156 | (defcustom makefile-backslash-column 48 | |
| 143 | (defvar makefile-browser-selected-mark "+ " | 157 | "*Column in which `makefile-backslash-region' inserts backslashes." |
| 144 | "String used to mark selected entries in the browser.") | 158 | :type 'integer |
| 145 | 159 | :group 'makefile) | |
| 146 | (defvar makefile-browser-unselected-mark " " | 160 | |
| 147 | "String used to mark unselected entries in the browser.") | 161 | (defcustom makefile-backslash-align t |
| 148 | 162 | "If non-nil, `makefile-backslash-region' will align backslashes." | |
| 149 | (defvar makefile-browser-auto-advance-after-selection-p t | 163 | :type 'boolean |
| 150 | "If non-nil, cursor will move after item is selected in browser.") | 164 | :group 'makefile) |
| 151 | 165 | ||
| 152 | (defvar makefile-pickup-everything-picks-up-filenames-p nil | 166 | (defcustom makefile-browser-selected-mark "+ " |
| 167 | "String used to mark selected entries in the Makefile browser." | ||
| 168 | :type 'string | ||
| 169 | :group 'makefile) | ||
| 170 | |||
| 171 | (defcustom makefile-browser-unselected-mark " " | ||
| 172 | "String used to mark unselected entries in the Makefile browser." | ||
| 173 | :type 'string | ||
| 174 | :group 'makefile) | ||
| 175 | |||
| 176 | (defcustom makefile-browser-auto-advance-after-selection-p t | ||
| 177 | "If non-nil, cursor will move after item is selected in Makefile browser." | ||
| 178 | :type 'boolean | ||
| 179 | :group 'makefile) | ||
| 180 | |||
| 181 | (defcustom makefile-pickup-everything-picks-up-filenames-p nil | ||
| 153 | "If non-nil, `makefile-pickup-everything' picks up filenames as targets. | 182 | "If non-nil, `makefile-pickup-everything' picks up filenames as targets. |
| 154 | \(i.e. it calls `makefile-find-filenames-as-targets'). | 183 | This means it calls `makefile-find-filenames-as-targets'. |
| 155 | Otherwise filenames are omitted.") | 184 | Otherwise filenames are omitted." |
| 185 | :type 'boolean | ||
| 186 | :group 'makefile) | ||
| 156 | 187 | ||
| 157 | (defvar makefile-cleanup-continuations-p t | 188 | (defcustom makefile-cleanup-continuations-p t |
| 158 | "If non-nil, automatically clean up continuation lines when saving. | 189 | "If non-nil, automatically clean up continuation lines when saving. |
| 159 | A line is cleaned up by removing all whitespace following a trailing | 190 | A line is cleaned up by removing all whitespace following a trailing |
| 160 | backslash. This is done silently. | 191 | backslash. This is done silently. |
| 161 | IMPORTANT: Please note that enabling this option causes makefile-mode | 192 | IMPORTANT: Please note that enabling this option causes makefile-mode |
| 162 | to MODIFY A FILE WITHOUT YOUR CONFIRMATION when \'it seems necessary\'.") | 193 | to MODIFY A FILE WITHOUT YOUR CONFIRMATION when \"it seems necessary\"." |
| 194 | :type 'boolean | ||
| 195 | :group 'makefile) | ||
| 163 | 196 | ||
| 164 | (defvar makefile-browser-hook '()) | 197 | (defvar makefile-browser-hook '()) |
| 165 | 198 | ||
| 166 | ;; | 199 | ;; |
| 167 | ;; Special targets for DMake, Sun's make ... | 200 | ;; Special targets for DMake, Sun's make ... |
| 168 | ;; | 201 | ;; |
| 169 | (defvar makefile-special-targets-list | 202 | (defcustom makefile-special-targets-list |
| 170 | '(("DEFAULT") ("DONE") ("ERROR") ("EXPORT") | 203 | '(("DEFAULT") ("DONE") ("ERROR") ("EXPORT") |
| 171 | ("FAILED") ("GROUPEPILOG") ("GROUPPROLOG") ("IGNORE") | 204 | ("FAILED") ("GROUPEPILOG") ("GROUPPROLOG") ("IGNORE") |
| 172 | ("IMPORT") ("INCLUDE") ("INCLUDEDIRS") ("INIT") | 205 | ("IMPORT") ("INCLUDE") ("INCLUDEDIRS") ("INIT") |
| @@ -177,14 +210,18 @@ to MODIFY A FILE WITHOUT YOUR CONFIRMATION when \'it seems necessary\'.") | |||
| 177 | ("el.elc") ("y.c") ("s.o")) | 210 | ("el.elc") ("y.c") ("s.o")) |
| 178 | "List of special targets. | 211 | "List of special targets. |
| 179 | You will be offered to complete on one of those in the minibuffer whenever | 212 | You will be offered to complete on one of those in the minibuffer whenever |
| 180 | you enter a \".\" at the beginning of a line in makefile-mode.") | 213 | you enter a \".\" at the beginning of a line in makefile-mode." |
| 214 | :type '(repeat (list string)) | ||
| 215 | :group 'makefile) | ||
| 181 | 216 | ||
| 182 | (defvar makefile-runtime-macros-list | 217 | (defcustom makefile-runtime-macros-list |
| 183 | '(("@") ("&") (">") ("<") ("*") ("^") ("+") ("?") ("%") ("$")) | 218 | '(("@") ("&") (">") ("<") ("*") ("^") ("+") ("?") ("%") ("$")) |
| 184 | "List of macros that are resolved by make at runtime. | 219 | "List of macros that are resolved by make at runtime. |
| 185 | If you insert a macro reference using makefile-insert-macro-ref, the name | 220 | If you insert a macro reference using makefile-insert-macro-ref, the name |
| 186 | of the macro is checked against this list. If it can be found its name will | 221 | of the macro is checked against this list. If it can be found its name will |
| 187 | not be enclosed in { } or ( ).") | 222 | not be enclosed in { } or ( )." |
| 223 | :type '(repeat (list string)) | ||
| 224 | :group 'makefile) | ||
| 188 | 225 | ||
| 189 | ;; Note that the first big subexpression is used by font lock. Note | 226 | ;; Note that the first big subexpression is used by font lock. Note |
| 190 | ;; that if you change this regexp you must fix the imenu index | 227 | ;; that if you change this regexp you must fix the imenu index |
| @@ -253,10 +290,13 @@ not be enclosed in { } or ( ).") | |||
| 253 | ;;; of `makefile-query-by-make-minus-q' . | 290 | ;;; of `makefile-query-by-make-minus-q' . |
| 254 | ;;; ------------------------------------------------------------ | 291 | ;;; ------------------------------------------------------------ |
| 255 | 292 | ||
| 256 | (defvar makefile-brave-make "make" | 293 | (defcustom makefile-brave-make "make" |
| 257 | "A make that can handle the `-q' option.") | 294 | "How to invoke make, for `makefile-query-targets'. |
| 295 | This should identify a `make' command that can handle the `-q' option." | ||
| 296 | :type 'string | ||
| 297 | :group 'makefile) | ||
| 258 | 298 | ||
| 259 | (defvar makefile-query-one-target-method 'makefile-query-by-make-minus-q | 299 | (defcustom makefile-query-one-target-method 'makefile-query-by-make-minus-q |
| 260 | "Function to call to determine whether a make target is up to date. | 300 | "Function to call to determine whether a make target is up to date. |
| 261 | The function must satisfy this calling convention: | 301 | The function must satisfy this calling convention: |
| 262 | 302 | ||
| @@ -269,10 +309,14 @@ The function must satisfy this calling convention: | |||
| 269 | 309 | ||
| 270 | * It must return the integer value 0 (zero) if the given target | 310 | * It must return the integer value 0 (zero) if the given target |
| 271 | should be considered up-to-date in the context of the given | 311 | should be considered up-to-date in the context of the given |
| 272 | makefile, any nonzero integer value otherwise.") | 312 | makefile, any nonzero integer value otherwise." |
| 273 | 313 | :type 'function | |
| 274 | (defvar makefile-up-to-date-buffer-name "*Makefile Up-to-date overview*" | 314 | :group 'makefile) |
| 275 | "Name of the Up-to-date overview buffer.") | 315 | |
| 316 | (defcustom makefile-up-to-date-buffer-name "*Makefile Up-to-date overview*" | ||
| 317 | "Name of the Up-to-date overview buffer." | ||
| 318 | :type 'string | ||
| 319 | :group 'makefile) | ||
| 276 | 320 | ||
| 277 | ;;; --- end of up-to-date-overview configuration ------------------ | 321 | ;;; --- end of up-to-date-overview configuration ------------------ |
| 278 | 322 | ||