diff --git a/collects/texpict/private/mrpict-extra.rkt b/collects/texpict/private/mrpict-extra.rkt
index 734d86590a..10ba5f1b6d 100644
--- a/collects/texpict/private/mrpict-extra.rkt
+++ b/collects/texpict/private/mrpict-extra.rkt
@@ -410,7 +410,7 @@
 			       (unless requested-color
 				 (fprintf (current-error-port)
 					  "WARNING: couldn't find color: ~s\n" (cadr x)))
-			       (set-pen (find-or-create-pen color (send p get-width) 'solid))
+                               (set-pen (find-or-create-pen color (send p get-width) (send p get-style)))
 			       (set-brush (find-or-create-brush color 'solid))
 			       (set-text-foreground color))
 			     (loop dx dy (caddr x))