500 |
command-args) |
command-args) |
501 |
'grep-mode nil highlight-regexp))) |
'grep-mode nil highlight-regexp))) |
502 |
|
|
|
;;; This doesn't work: |
|
|
;;; ###autoload (autoload 'grep-mode "grep" nil t) |
|
|
;;; The ostensibly correct result is nonetheless opaque to the accounting |
|
|
;;; done in `generate-file-autoloads'; in loaddefs.el, the generated elisp is |
|
|
;;; correct but the generated header comment for grep.el lacks `grep-mode'. |
|
|
;;; This approach also doesn't help other users of `define-compilation-mode' |
|
|
;;; who wish to autoload. |
|
|
;;; |
|
|
;;; Better to extend autoload.el to grok `define-compilation-mode'. |
|
|
|
|
|
;;;###autoload |
|
503 |
(define-compilation-mode grep-mode "Grep" |
(define-compilation-mode grep-mode "Grep" |
504 |
"Sets `grep-last-buffer' and `compilation-window-height'." |
"Sets `grep-last-buffer' and `compilation-window-height'." |
505 |
(setq grep-last-buffer (current-buffer)) |
(setq grep-last-buffer (current-buffer)) |
615 |
|
|
616 |
(provide 'grep) |
(provide 'grep) |
617 |
|
|
618 |
;;; arch-tag: 5a5b9169-a79d-4f38-9c38-f69615f39c4d |
;; arch-tag: 5a5b9169-a79d-4f38-9c38-f69615f39c4d |
619 |
;;; grep.el ends here |
;;; grep.el ends here |