summaryrefslogtreecommitdiff
path: root/elisp/geiser-repl.el
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-11-08 04:05:31 +0100
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-11-08 04:05:31 +0100
commit39d0ccb19d7c390f306374987219b1d599902bdc (patch)
treebbf044ae5b3190ebebd91b32ba7f6d54c1fd04bc /elisp/geiser-repl.el
parentf04b9429de1cb815c2ad680603077be6a0d10132 (diff)
downloadgeiser-guile-39d0ccb19d7c390f306374987219b1d599902bdc.tar.gz
geiser-guile-39d0ccb19d7c390f306374987219b1d599902bdc.tar.bz2
Better handling of REPL's header line
Diffstat (limited to 'elisp/geiser-repl.el')
-rw-r--r--elisp/geiser-repl.el8
1 files changed, 4 insertions, 4 deletions
diff --git a/elisp/geiser-repl.el b/elisp/geiser-repl.el
index f6fc12b..ee88005 100644
--- a/elisp/geiser-repl.el
+++ b/elisp/geiser-repl.el
@@ -214,10 +214,10 @@ module command as a string")
(defun geiser-repl--save-remote-data (remote address)
(setq geiser-repl--address (and remote address))
- (when remote
- (setq header-line-format (format "Host: %s Port: %s"
- (geiser-repl--host)
- (geiser-repl--port)))))
+ (setq header-line-format (and remote
+ (format "Host: %s Port: %s"
+ (geiser-repl--host)
+ (geiser-repl--port)))))
(defun geiser-repl--start-repl (impl &optional remote)
(message "Starting Geiser REPL for %s ..." impl)