diff options
| author | Roland Winkler | 2006-05-21 19:26:05 +0000 |
|---|---|---|
| committer | Roland Winkler | 2006-05-21 19:26:05 +0000 |
| commit | b308197bd966642973bcd9da7ed44e5b2a9e1257 (patch) | |
| tree | 458723c6e00f1082961c12835884080d26c3681b | |
| parent | f904adbb72473d9c0665e3d65943d86e051d6a3a (diff) | |
| download | emacs-b308197bd966642973bcd9da7ed44e5b2a9e1257.tar.gz emacs-b308197bd966642973bcd9da7ed44e5b2a9e1257.zip | |
(makefile-query-one-target-method): Make this the alias for the
following variable.
(makefile-query-one-target-method-function): Make this the real name.
| -rw-r--r-- | lisp/progmodes/make-mode.el | 10 |
1 files changed, 7 insertions, 3 deletions
diff --git a/lisp/progmodes/make-mode.el b/lisp/progmodes/make-mode.el index f8b7a1c6a91..66507dd78df 100644 --- a/lisp/progmodes/make-mode.el +++ b/lisp/progmodes/make-mode.el | |||
| @@ -545,7 +545,8 @@ This should identify a `make' command that can handle the `-q' option." | |||
| 545 | :type 'string | 545 | :type 'string |
| 546 | :group 'makefile) | 546 | :group 'makefile) |
| 547 | 547 | ||
| 548 | (defcustom makefile-query-one-target-method 'makefile-query-by-make-minus-q | 548 | (defcustom makefile-query-one-target-method-function |
| 549 | 'makefile-query-by-make-minus-q | ||
| 549 | "*Function to call to determine whether a make target is up to date. | 550 | "*Function to call to determine whether a make target is up to date. |
| 550 | The function must satisfy this calling convention: | 551 | The function must satisfy this calling convention: |
| 551 | 552 | ||
| @@ -561,6 +562,8 @@ The function must satisfy this calling convention: | |||
| 561 | makefile, any nonzero integer value otherwise." | 562 | makefile, any nonzero integer value otherwise." |
| 562 | :type 'function | 563 | :type 'function |
| 563 | :group 'makefile) | 564 | :group 'makefile) |
| 565 | (defvaralias 'makefile-query-one-target-method | ||
| 566 | 'makefile-query-one-target-method-function) | ||
| 564 | 567 | ||
| 565 | (defcustom makefile-up-to-date-buffer-name "*Makefile Up-to-date overview*" | 568 | (defcustom makefile-up-to-date-buffer-name "*Makefile Up-to-date overview*" |
| 566 | "*Name of the Up-to-date overview buffer." | 569 | "*Name of the Up-to-date overview buffer." |
| @@ -1618,7 +1621,8 @@ with the generated name!" | |||
| 1618 | 1621 | ||
| 1619 | (defun makefile-query-targets (filename target-table prereq-list) | 1622 | (defun makefile-query-targets (filename target-table prereq-list) |
| 1620 | "Fill the up-to-date overview buffer. | 1623 | "Fill the up-to-date overview buffer. |
| 1621 | Checks each target in TARGET-TABLE using `makefile-query-one-target-method' | 1624 | Checks each target in TARGET-TABLE using |
| 1625 | `makefile-query-one-target-method-function' | ||
| 1622 | and generates the overview, one line per target name." | 1626 | and generates the overview, one line per target name." |
| 1623 | (insert | 1627 | (insert |
| 1624 | (mapconcat | 1628 | (mapconcat |
| @@ -1627,7 +1631,7 @@ and generates the overview, one line per target name." | |||
| 1627 | (no-prereqs (not (member target-name prereq-list))) | 1631 | (no-prereqs (not (member target-name prereq-list))) |
| 1628 | (needs-rebuild (or no-prereqs | 1632 | (needs-rebuild (or no-prereqs |
| 1629 | (funcall | 1633 | (funcall |
| 1630 | makefile-query-one-target-method | 1634 | makefile-query-one-target-method-function |
| 1631 | target-name | 1635 | target-name |
| 1632 | filename)))) | 1636 | filename)))) |
| 1633 | (format "\t%s%s" | 1637 | (format "\t%s%s" |