From 338a77f34117c7831829f03ad808c48c0ef93007 Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Fri, 7 Sep 2007 01:12:56 +0000 Subject: [PATCH] fixed a bug in the error checking code svn: r7288 --- collects/slideshow/cmdline.ss | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/collects/slideshow/cmdline.ss b/collects/slideshow/cmdline.ss index d7810ec341..d3782b2a8d 100644 --- a/collects/slideshow/cmdline.ss +++ b/collects/slideshow/cmdline.ss @@ -89,7 +89,7 @@ [nh (string->number h)]) (unless (and nw (< 0 nw 10000)) (die 'slideshow "bad width: ~e" w)) - (unless (and nw (< 0 nh 10000)) + (unless (and nh (< 0 nh 10000)) (die 'slideshow "bad height: ~e" h)) (set! actual-screen-w nw) (set! actual-screen-h nh)))