/[emacs]/emacs/lisp/progmodes/compile.el
ViewVC logotype

Diff of /emacs/lisp/progmodes/compile.el

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.243 by rms, Sat Nov 10 23:19:43 2001 UTC revision 1.244 by rms, Wed Nov 14 04:23:45 2001 UTC
# Line 580  to a function that generates a unique na Line 580  to a function that generates a unique na
580    
581  ;; run compile with the default command line  ;; run compile with the default command line
582  (defun recompile ()  (defun recompile ()
583    "Re-compile the program including the current buffer."    "Re-compile the program including the current buffer.
584    If this is run in a compilation-mode buffer, re-use the arguments from the
585    original use.  Otherwise, it recompiles using `compile-command'."
586    (interactive)    (interactive)
587    (save-some-buffers (not compilation-ask-about-save) nil)    (save-some-buffers (not compilation-ask-about-save) nil)
588    (compile-internal (eval compile-command) "No more errors"))    (apply 'compile-internal (or compilation-arguments
589                                  `(,(eval compile-command) "No more errors"))))
590    
591  (defun grep-process-setup ()  (defun grep-process-setup ()
592    "Set up `compilation-exit-message-function' for `grep'."    "Set up `compilation-exit-message-function' for `grep'."

Legend:
Removed from v.1.243  
changed lines
  Added in v.1.244

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26