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

fixed a bug in a call to update-arrowhead-polygon

Browse Source 
svn: r13250

original commit: 265f75379a45f82309d2a094da86f1f0d042c486
This commit is contained in:
Robby Findler 2009-01-21 17:28:56 +00:00
parent cb96056143
commit 5fa5b272b9
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/mrlib/graph.ss
View File

@ -536,7 +536,7 @@
[(b45x b45y) (values s5x s4y)]
[(b56x b56y) (values s5x s6y)])
(update-arrowhead-polygon s4x s4y sx s4y)
(update-arrowhead-polygon s4x s4y sx s4y point1 point2 point3 point4)
(send dc draw-spline (+ dx s1x) (+ dy s1y) (+ dx b12x) (+ dy b12y) (+ dx s2x) (+ dy s2y))
(send dc draw-spline (+ dx s2x) (+ dy s2y) (+ dx b23x) (+ dy b23y) (+ dx s3x) (+ dy s3y))
(send dc draw-line (+ dx s3x) (+ dy s3y) (+ dx s6x) (+ dy s6y))