Skip to content

Restore haskell-process-cd functionality.. #797

New issue

Have a question about this project? Sign up for a free GitHub account to open an issue and contact its maintainers and the community.

Sign up for GitHub

By clicking “Sign up for GitHub”, you agree to our terms of service and privacy statement. We’ll occasionally send you account related emails.

Already on GitHub? Sign in to your account

Merged
merged 8 commits into from
Aug 8, 2015
Merged

Restore haskell-process-cd functionality.. #797

Changes from 1 commit
Commits
Show all changes
8 commits
Select commit Hold shift + click to select a range
ec7ffde
haskell-cabal-get-dir: optionally default
deepfire Aug 5, 2015
47d066f
haskell-session-cabal-dir: simplify
deepfire Aug 5, 2015
4d5573f
haskell-utils-read-directory-name: make the name meaningful once again
deepfire Aug 5, 2015
fd8180a
haskell-session-cabal-dir: restore parametrisation the better way
deepfire Aug 5, 2015
7dafe8b
haskell-session-buffer-default-dir: factor
deepfire Aug 5, 2015
f9648a7
haskell-session-pwd: liberate from the nonsensical second argument
deepfire Aug 5, 2015
0cf8cd4
haskell-session-prompt-current-dir: rename from haskell-session-pwd
deepfire Aug 5, 2015
9e985f3
haskell-process-start: restore haskell-process-load-or-reload-prompt…
deepfire Aug 7, 2015
File filter

Filter by extension

Filter by extension
Conversations
Failed to load comments.
Loading
Jump to
Jump to file
Failed to load files.
Loading
Diff view
Diff view
Prev Previous commit
Next Next commit
haskell-utils-read-directory-name: make the name meaningful once again
  • Loading branch information
@deepfire
deepfire committed Aug 7, 2015
commit 4d5573f491a7e616b25b223b3feff25e6c047ae7
7 changes: 1 addition & 6 deletions haskell-utils.el
View file
Open in desktop
Original file line number Diff line number Diff line change
Expand Up @@ -48,12 +48,7 @@
"Read directory name and normalize to true absolute path.
Refer to `read-directory-name' for the meaning of PROMPT and
DEFAULT. If `haskell-process-load-or-reload-prompt' is nil, accept `default'."
(let ((filename (file-truename
(if haskell-process-load-or-reload-prompt
(read-directory-name prompt
default
default)
default))))
(let ((filename (file-truename (read-directory-name prompt default default))))
(concat (replace-regexp-in-string "/$" "" filename) "/")))

(defun haskell-utils-parse-import-statement-at-point ()
Expand Down