+ ;; Change to the compilation buffer so that `ack-buffer-name-function' can
+ ;; make use of `compilation-arguments'.
+ (with-current-buffer (compilation-start command-args 'ack-mode)
+ (when ack-buffer-name-function
+ (rename-buffer (funcall ack-buffer-name-function "ack"))))))