haskell-load-on-save: new custom

Author: deepfire

haskell-customize.el

@@ -97,6 +97,11 @@ when showing type information about symbols."
   :link '(custom-manual "(haskell-mode)haskell-interactive-mode")
   :group 'haskell)
 
+(defcustom haskell-load-on-save nil
+  "Whether to load the buffer after saving."
+  :group 'haskell-interactive
+  :type 'boolean)
+
 (defcustom haskell-process-path-ghci
   "ghci"
   "The path for starting ghci."

haskell.el

@@ -342,7 +342,9 @@ If `haskell-process-load-or-reload-prompt' is nil, accept `default'."
     (ignore-errors (haskell-mode-stylish-buffer))
     (let ((before-save-hook '())
           (after-save-hook '()))
-      (basic-save-buffer))))
+      (basic-save-buffer)))
+  (when haskell-load-on-save
+    (haskell-process-load-or-reload)))
 
 ;;;###autoload
 (defun haskell-mode-tag-find (&optional next-p)