From 0051c9ee4eefe5f8a9ab56d26f96f57b9f2870ef Mon Sep 17 00:00:00 2001
From: Jose Antonio Ortega Ruiz <jao@gnu.org>
Date: Tue, 11 Jun 2013 15:51:05 +0200
Subject: racket: ,cd accepting also non-quoted paths

just because we can
---
 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 31f789e..d570a39 100644
--- a/scheme/racket/geiser/user.rkt
+++ b/scheme/racket/geiser/user.rkt
@@ -108,7 +108,7 @@
          [(help) (get-help (read) (read))]
          [(image-cache) (image-cache)]
          [(pwd) (~a (current-directory))]
-         [(cd) (current-directory (read))]
+         [(cd) (current-directory (~a (read)))]
          [else form])]
       [_ form])))
 
-- 
cgit v1.2.3