repair for snip% change

Fixes a problem with 755377ca82.
2013-02-05 15:22:29 +01:00 · 2013-02-05 15:22:29 +01:00 · 6c58cde2aa
commit 6c58cde2aa
parent d0cfc34a77
1 changed files with 1 additions and 1 deletions
--- a/collects/racket/snip/private/snip.rkt
+++ b/collects/racket/snip/private/snip.rkt
@ -711,7 +711,7 @@
                            [maybe-box? [descent #f]] [maybe-box? [space #f]]
                            [maybe-box? [lspace #f]] [maybe-box? [rspace #f]])
    (let* ([old-w str-metric]
-           [changed? (old-w . < . 0)])
+           [changed? (not old-w)])
      (super get-extent dc ex ey wi h descent space lspace rspace)

      (when changed?