summaryrefslogtreecommitdiff
path: root/scheme
diff options
context:
space:
mode:
authorJose Antonio Ortega Ruiz <jao@gnu.org>2010-03-28 06:58:12 +0200
committerJose Antonio Ortega Ruiz <jao@gnu.org>2010-03-28 06:58:12 +0200
commit1d4c0a0474f8934aa989c1a03e6fd8f63cd9c899 (patch)
tree76fb164dfb1118609560d1bc08c34d34bbb17fb0 /scheme
parentc58f1093970c7fb90b44c98a7cc762453e9b7936 (diff)
downloadgeiser-guile-1d4c0a0474f8934aa989c1a03e6fd8f63cd9c899.tar.gz
geiser-guile-1d4c0a0474f8934aa989c1a03e6fd8f63cd9c899.tar.bz2
PLT: Correct version check.
Diffstat (limited to 'scheme')
-rw-r--r--scheme/plt/geiser.ss15
1 files changed, 7 insertions, 8 deletions
diff --git a/scheme/plt/geiser.ss b/scheme/plt/geiser.ss
index a86b6a9..4df9b51 100644
--- a/scheme/plt/geiser.ss
+++ b/scheme/plt/geiser.ss
@@ -11,13 +11,14 @@
;;; Code:
-(require version/utils)
-(unless (version<=? "4.1.5.5" (version))
- (error 'geiser
- "Mzscheme version 4.1.5.5 or better required (found ~a)"
- (version)))
-
(module geiser scheme
+
+ (require version/utils)
+ (unless (version<=? "4.2" (version))
+ (error 'geiser
+ "Mzscheme version 4.2 or better required (found ~a)"
+ (version)))
+
(provide geiser:eval
geiser:compile
geiser:load-file
@@ -55,6 +56,4 @@
(current-prompt-read (compose (make-repl-reader (current-prompt-read))
current-namespace)))
-(require 'geiser)
-
;;; geiser.ss ends here