run stylish-haskell before save

Author: bergey

haskell-mode.el

@@ -872,7 +872,8 @@ To be added to `flymake-init-create-temp-buffer-copy'."
 
 (defun haskell-mode-before-save-handler ()
   "Function that will be called before buffer's saving."
-  )
+  (when haskell-stylish-on-save
+    (ignore-errors (haskell-mode-stylish-buffer))))
 
 ;; From Bryan O'Sullivan's blog:
 ;; http://www.serpentine.com/blog/2007/10/09/using-emacs-to-insert-scc-annotations-in-haskell-code/

haskell.el

@@ -381,8 +381,6 @@ If `haskell-process-load-or-reload-prompt' is nil, accept `default'."
   (when haskell-tags-on-save
     (ignore-errors (when (and (boundp 'haskell-session) haskell-session)
                      (haskell-process-generate-tags))))
-  (when haskell-stylish-on-save
-    (ignore-errors (haskell-mode-stylish-buffer))
     (let ((before-save-hook '())
           (after-save-hook '()))
       (basic-save-buffer))))