Mercurial > hg > xemacs-beta
comparison lisp/modes/make-mode.el @ 94:1040fe1366ac xemacs-20-0f2
Import from CVS: tag xemacs-20-0f2
author | cvs |
---|---|
date | Mon, 13 Aug 2007 09:12:09 +0200 |
parents | 1ce6082ce73f |
children | cca96a509cfe |
comparison
equal
deleted
inserted
replaced
93:486ff617c2a1 | 94:1040fe1366ac |
---|---|
944 makefile-browser-unselected-mark) | 944 makefile-browser-unselected-mark) |
945 "%s%s") | 945 "%s%s") |
946 target makefile-target-colon)) | 946 target makefile-target-colon)) |
947 | 947 |
948 (defun makefile-browser-format-macro-line (macro selected) | 948 (defun makefile-browser-format-macro-line (macro selected) |
949 (format | |
950 (concat (make-string makefile-browser-leftmost-column ?\ ) | 949 (concat (make-string makefile-browser-leftmost-column ?\ ) |
951 (if selected | 950 (if selected |
952 makefile-browser-selected-mark | 951 makefile-browser-selected-mark |
953 makefile-browser-unselected-mark) | 952 makefile-browser-unselected-mark) |
954 (makefile-format-macro-ref macro)))) | 953 (makefile-format-macro-ref macro))) |
955 | 954 |
956 (defun makefile-browser-fill (targets macros) | 955 (defun makefile-browser-fill (targets macros) |
957 (let ((inhibit-read-only t)) | 956 (let ((inhibit-read-only t)) |
958 (goto-char (point-min)) | 957 (goto-char (point-min)) |
959 (erase-buffer) | 958 (erase-buffer) |
1106 (interactive) | 1105 (interactive) |
1107 (run-hooks 'makefile-browser-hook) | 1106 (run-hooks 'makefile-browser-hook) |
1108 (setq makefile-browser-client (current-buffer)) | 1107 (setq makefile-browser-client (current-buffer)) |
1109 (makefile-pickup-targets) | 1108 (makefile-pickup-targets) |
1110 (makefile-pickup-macros) | 1109 (makefile-pickup-macros) |
1111 (makefile-browse makefile-target-table makefile-macro-table)) | 1110 (makefile-browse makefile-target-table |
1111 ;; take out the runtime macros which were added for completion sake -gk | |
1112 (set-difference makefile-macro-table makefile-runtime-macros-list))) | |
1112 | 1113 |
1113 | 1114 |
1114 | 1115 |
1115 ;;; ------------------------------------------------------------ | 1116 ;;; ------------------------------------------------------------ |
1116 ;;; Up-to-date overview buffer | 1117 ;;; Up-to-date overview buffer |