hasufell
/
ghc-mod
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

nil check.

This commit is contained in:
Kazu Yamamoto 2012-01-06 11:12:28 +09:00
parent 432de2e4f9
commit 2cc43498fa
1 changed files with 4 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
elisp/ghc-info.el
View File

@ -56,8 +56,10 @@
(display-buffer buf)))
(defun ghc-read-expression (default)
(let ((prompt (format "Expression (%s): " default)))
(read-string prompt default nil)))
(if default
(let ((prompt (format "Expression (%s): " default)))
(read-string prompt default nil))
(read-string "Expression: ")))
(defun ghc-find-module-name ()
(save-excursion