compilation mode improvements

gistfile1.el

;
; compilation-mode improvements
;
(defun compilation-custom-hook ()
  (visual-line-mode 1))
(add-hook 'compilation-mode-hook 'compilation-custom-hook)

(defun sludge-recompile-quietly ()
  "Re-compile without changing the window configuration."
  (interactive)
  (save-window-excursion
    (recompile)))

(defun sludge-next-error() 
  (interactive)
  (save-window-excursion
    (next-error)
    ))

(defun sludge-prev-error()
  (interactive)
  (save-window-excursion
    (prev-error)
    ))

(global-set-key (kbd "C-x `") 'sludge-next-error)