suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

fixed small bug in error message for draw/idraw teachpack

Browse Source 
svn: r12491
This commit is contained in:
Matthias Felleisen 2008-11-18 15:33:24 +00:00
parent 96075e9793
commit b35c6545a7
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/htdch/draw/support.scm
View File

@ -74,7 +74,7 @@
(define (check-arg value method argument)
(or (> value 0)
(raise-error
(format "Method ~a expects an int >= 0 for ~a argument, given ~a" method argument value))))
(format "Method ~a expects an int > 0 for ~a argument, given ~a" method argument value))))
(define (to-lower-case s)
(letrec ((lower