diff options
| author | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2013-06-08 23:15:15 +0200 |
|---|---|---|
| committer | Jose Antonio Ortega Ruiz <jao@gnu.org> | 2013-06-08 23:15:15 +0200 |
| commit | 2dfa425356fabe2289598212b32359dc41dfb64c (patch) | |
| tree | 56ff0d2c220efd1036d5e874364c27b1b8452a92 /scheme | |
| parent | 1551885d929463723748b81e9bfab07bde0d1f47 (diff) | |
| download | geiser-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')
| -rw-r--r-- | scheme/racket/geiser/user.rkt | 2 |
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]))) |