From 2dfa425356fabe2289598212b32359dc41dfb64c Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Sat, 8 Jun 2013 23:15:15 +0200
Subject: 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!
---
 scheme/racket/geiser/user.rkt | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'scheme')

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])))
-- 
cgit v1.2.3