Merge pull request #1137 from bergey/stylish-haskell-after-save

Stylish haskell after save

Author: gracjan

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

@@ -380,12 +380,7 @@ If `haskell-process-load-or-reload-prompt' is nil, accept `default'."
   "Function that will be called after buffer's saving."
   (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))))
+                     (haskell-process-generate-tags)))))
 
 ;;;###autoload
 (defun haskell-mode-tag-find (&optional _next-p)