diff --git a/collects/texpict/private/common-unit.ss b/collects/texpict/private/common-unit.ss
index 8b7f41dfbd..f8c2df4930 100644
--- a/collects/texpict/private/common-unit.ss
+++ b/collects/texpict/private/common-unit.ss
@@ -838,8 +838,8 @@
 	(place-it 'pin-over #t base dx dy target))
       (define (pin-under base dx dy target)
 	(cc-superimpose
-	 (place-it 'pin-under #t (launder (ghost base)) dx dy target)
-	 base))
+	 (place-it 'pin-under #t (ghost base) dx dy target)
+	 (launder base)))
 
       (define black-and-white
 	(make-parameter #f