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

oops

Browse Source 
svn: r2700
This commit is contained in:
Robby Findler 2006-04-18 03:12:13 +00:00
parent 331a1c896b
commit 72d9f314bb
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/texpict/face.ss
View File

@ -163,7 +163,7 @@
(send dc set-brush (find-brush "white")) (send dc set-brush (find-brush "white"))
(send dc draw-ellipse x y w h) (send dc draw-ellipse x y w h)
(series dc (series dc
(if teeth-shading? 5 1) (if teeth-shading? 5 0)
(make-object color% "darkgray") (make-object color% "darkgray")
(make-object color% "lightgray") (make-object color% "lightgray")
(lambda (i) (lambda (i)