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

Revert "Stylish haskell after save"

Author: gracjan

haskell-mode.el

@@ -872,8 +872,7 @@ 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,7 +380,12 @@ 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)))))
+                     (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))))
 
 ;;;###autoload
 (defun haskell-mode-tag-find (&optional _next-p)