svn: r14832
This commit is contained in:
parent
6a4c101859
commit
dff15857f0
|
@ -89,7 +89,7 @@
|
||||||
#:under? [under? #f]
|
#:under? [under? #f]
|
||||||
#:solid? [solid? #t]
|
#:solid? [solid? #t]
|
||||||
#:hide-arrowhead? [hide-arrowhead? #f])
|
#:hide-arrowhead? [hide-arrowhead? #f])
|
||||||
(if (not sa ea)
|
(if (not (or sa ea))
|
||||||
(finish-pin (launder (t:pin-arrows-line sz (ghost p)
|
(finish-pin (launder (t:pin-arrows-line sz (ghost p)
|
||||||
src src-find
|
src src-find
|
||||||
dest dest-find
|
dest dest-find
|
||||||
|
|
Loading…
Reference in New Issue
Block a user