Re: How to recompile single file or rerun single compilation command in compilation mode ?

[Thien-Thi Nguyen]

() Nash Steve <nash11228@gmail.com>
() Wed, 7 Mar 2012 10:44:40 -0500

   I want to run a line in compilation-mode buffer as a compile
   command.  e.g. after M-x compile RET make, I just want to pick
   a line of make output as a command to run.

Maybe something like this (only lightly tested)?

(require 'thingatpt)

(defun compilation-compile-with-current-line (dir)
  "Extract the current line as a command and execute it in DIR."
  (interactive "DExecute command in directory: ")
  (let ((command (substring-no-properties (thing-at-point 'line) 0 -1)))
    ;; Do it this way instead of using "cd DIR; COMMAND"
    ;; to avoid outrageous prefixing on repeated invocations.
    (let ((default-directory dir))
      (compile (format "%s" command)))))

(define-key compilation-mode-map "\C-c\C-a" ; "a" for "again"
  'compilation-compile-with-current-line)