From 45f87cf0569f4d0b393f2a0f848ae947440d2b5b Mon Sep 17 00:00:00 2001 From: Robby Findler Date: Tue, 5 Apr 2005 17:28:19 +0000 Subject: [PATCH] . original commit: cf97864abcae0bce3b9fee063af7b162030d7ff2 --- collects/framework/private/text.ss | 1 + 1 file changed, 1 insertion(+) diff --git a/collects/framework/private/text.ss b/collects/framework/private/text.ss index 0377d1d1..3c76e368 100644 --- a/collects/framework/private/text.ss +++ b/collects/framework/private/text.ss @@ -609,6 +609,7 @@ WARNING: printf is rebound in the body of the unit to always (hash-table-put! linked-snips snip new-snip) new-snip)])]) (send new-snip set-flags (send snip get-flags)) + (send new-snip set-style (send snip get-style)) new-snip)) (define delegate #f)