svn: r14832

This commit is contained in:
Robby Findler 2009-05-15 17:39:09 +00:00
parent 6a4c101859
commit dff15857f0

View File

@ -89,7 +89,7 @@
#:under? [under? #f]
#:solid? [solid? #t]
#:hide-arrowhead? [hide-arrowhead? #f])
(if (not sa ea)
(if (not (or sa ea))
(finish-pin (launder (t:pin-arrows-line sz (ghost p)
src src-find
dest dest-find