Sorry, I got the files backwards in the last patch. Here's an updated version.

--
-David House, [EMAIL PROTECTED]
*** /usr/local/share/emacs/site-lisp/haskell-mode-2.3/inf-haskell.el	2007-04-29 15:28:57.000000000 +0100
--- /usr/local/share/emacs/site-lisp/haskell-mode-2.3/inf-haskell-mine.el	2007-04-29 15:29:12.000000000 +0100
***************
*** 176,184 ****
  (defun inferior-haskell-load-file (&optional reload)
    "Pass the current buffer's file to the inferior haskell process."
    (interactive)
    (let ((file buffer-file-name)
  	(proc (inferior-haskell-process)))
-     (save-buffer)
      (with-current-buffer (process-buffer proc)
        ;; Not sure if it's useful/needed and if it actually works.
        ;; (unless (equal (file-name-as-directory default-directory)
--- 176,184 ----
  (defun inferior-haskell-load-file (&optional reload)
    "Pass the current buffer's file to the inferior haskell process."
    (interactive)
+   (save-buffer)
    (let ((file buffer-file-name)
  	(proc (inferior-haskell-process)))
      (with-current-buffer (process-buffer proc)
        ;; Not sure if it's useful/needed and if it actually works.
        ;; (unless (equal (file-name-as-directory default-directory)

Reply via email to