branch: elpa/geiser-racket
commit 12dc25eeb4407bba0135fcc9d11cf9649d9ce522
Author: Jose Antonio Ortega Ruiz <j...@gnu.org>
Commit: Jose Antonio Ortega Ruiz <j...@gnu.org>
Racket: ',enter "foo"' as a synonym of ',enter (file "foo")'
---
geiser/user.rkt | 3 ++-
1 file changed, 2 insertions(+), 1 deletion(-)
diff --git a/geiser/user.rkt b/geiser/user.rkt
index 70defd4..72aa48a 100644
--- a/geiser/user.rkt
+++ b/geiser/user.rkt
@@ -1,6 +1,6 @@
;;; user.rkt -- global bindings visible to geiser users
-;; Copyright (C) 2010 Jose Antonio Ortega Ruiz
+;; Copyright (C) 2010, 2011 Jose Antonio Ortega Ruiz
;; This program is free software; you can redistribute it and/or
;; modify it under the terms of the Modified BSD License. You should
@@ -28,6 +28,7 @@
[(module-path? mod)
(enter-module mod)
(current-namespace (module->namespace mod))]
+ [(path-string? mod) (enter! `(file ,mod) stx)]
[else (raise-syntax-error
#f
"not a valid module path, and not #f"
