Skip to content

HTTPS clone URL

Subversion checkout URL

You can clone with
or
.
Download ZIP
Browse files

(inferior-haskell-cabal-of-buf)

Ignore-this: a87d64a4e41d56dc4f49b2b66152ddbd
(inferior-haskell-cabal-of-buf)
(inferior-haskell-module-alist-file): Adjust for XEmacs.

darcs-hash:20080131232507-c2f2e-9571b7784a9e816631028ec331f30c27e6b31a96.gz
  • Loading branch information...
commit 439a89edf0f94608101d8fe29c37395322e6039e 1 parent 9bc24a4
monnier authored
Showing with 12 additions and 3 deletions.
  1. +5 −0 ChangeLog
  2. +7 −3 inf-haskell.el
View
5 ChangeLog
@@ -1,3 +1,8 @@
+2008-01-30 Greg Steuck <greg@nest.cx> (tiny change)
+
+ * inf-haskell.el (inferior-haskell-cabal-of-buf)
+ (inferior-haskell-module-alist-file): Adjust for XEmacs.
+
2008-01-17 Stefan Monnier <monnier@iro.umontreal.ca>
* haskell-cabal.el (haskell-cabal-font-lock-keywords): Add rules
View
10 inf-haskell.el
@@ -1,6 +1,6 @@
;;; inf-haskell.el --- Interaction with an inferior Haskell process.
-;; Copyright (C) 2004, 2005, 2006, 2007 Free Software Foundation, Inc.
+;; Copyright (C) 2004, 2005, 2006, 2007, 2008 Free Software Foundation, Inc.
;; Author: Stefan Monnier <monnier@iro.umontreal.ca>
;; Keywords: Haskell
@@ -211,7 +211,9 @@ The process PROC should be associated to a comint buffer."
(require 'haskell-cabal)
(with-current-buffer buf
(or inferior-haskell-cabal-buffer
- (and (not (local-variable-p 'inferior-haskell-cabal-buffer))
+ (and (not (local-variable-p 'inferior-haskell-cabal-buffer
+ ;; XEmacs needs this argument.
+ (curent-buffer)))
(set (make-local-variable 'inferior-haskell-cabal-buffer)
(haskell-cabal-find-file))))))
@@ -546,7 +548,9 @@ buffer."
;; (expand-file-name "~/.inf-haskell-module-alist")
(expand-file-name (concat "inf-haskell-module-alist-"
(number-to-string (user-uid)))
- temporary-file-directory)
+ (if (fboundp 'temp-directory)
+ (temp-directory)
+ temporary-file-directory))
"Where to save the module -> package lookup table.
Set this to `nil' to never cache to a file."
:group 'haskell

0 comments on commit 439a89e

Please sign in to comment.
Something went wrong with that request. Please try again.