summaryrefslogtreecommitdiff
path: root/scheme/racket/geiser
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2013-06-08 23:15:15 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2013-06-08 23:15:15 +0200
commit2dfa425356fabe2289598212b32359dc41dfb64c (patch)
tree56ff0d2c220efd1036d5e874364c27b1b8452a92 /scheme/racket/geiser
parent1551885d929463723748b81e9bfab07bde0d1f47 (diff)
downloadgeiser-guile-2dfa425356fabe2289598212b32359dc41dfb64c.tar.gz
geiser-guile-2dfa425356fabe2289598212b32359dc41dfb64c.tar.bz2
racket: ,gcd -> ,pwd
And we display it (the current path, settable via ,cd) as a string. This was, i'm sure, a secret command nobody is using!
Diffstat (limited to 'scheme/racket/geiser')
-rw-r--r--scheme/racket/geiser/user.rkt2
1 files changed, 1 insertions, 1 deletions
diff --git a/scheme/racket/geiser/user.rkt b/scheme/racket/geiser/user.rkt
index 753f353..96b6431 100644
--- a/scheme/racket/geiser/user.rkt
+++ b/scheme/racket/geiser/user.rkt
@@ -89,7 +89,7 @@
[(set-image-cache) (image-cache (read))]
[(help) (get-help (read) (read))]
[(image-cache) (image-cache)]
- [(gcd) (current-directory)]
+ [(pwd) (~a (current-directory))]
[(cd) (current-directory (read))]
[else form])]
[_ form])))