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

.

Browse Source 
original commit: c4c18f7c3760988b07816e88d543ed80ec10052a
This commit is contained in:
Robby Findler 2005-01-22 02:06:34 +00:00
parent edeea4c6fa
commit 6f8905fd1f
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

@ -79,7 +79,7 @@
(case-lambda
[(parent child) (add-links parent child #f #f #f #f)]
[(parent child dark-pen light-pen dark-brush light-brush)
(add-links child dark-pen light-pen dark-brush light-brush 0 0)]
(add-links parent child dark-pen light-pen dark-brush light-brush 0 0)]
[(parent child dark-pen light-pen dark-brush light-brush dx dy)
(send parent add-child child)
(send child add-parent parent dark-pen light-pen dark-brush light-brush dx dy)]))