performance bugfix

svn: r4553
2006-10-11 19:54:57 +00:00 · 2006-10-11 19:54:57 +00:00 · 974337cc6f
commit 974337cc6f
parent 57b8cc9a64
1 changed files with 1 additions and 1 deletions
--- a/collects/texpict/private/common-unit.ss
+++ b/collects/texpict/private/common-unit.ss
@ -838,7 +838,7 @@
 	(place-it 'pin-over #t base dx dy target))
      (define (pin-under base dx dy target)
 	(cc-superimpose
-	 (place-it 'pin-under #t (ghost base) dx dy target)
+	 (place-it 'pin-under #t (launder (ghost base)) dx dy target)
 	 base))

      (define black-and-white