use `assert' around a debugging check

original commit: 39c6fe02d720cc44566e2fec0394d296c03f9e7d
2010-12-13 14:52:56 -07:00 · 2010-12-13 14:52:56 -07:00 · a8eb980fab
commit a8eb980fab
parent 5f9d2ea5e7
1 changed files with 1 additions and 1 deletions
--- a/collects/mred/private/wxme/mline.rkt
+++ b/collects/mred/private/wxme/mline.rkt
@ -948,7 +948,7 @@ Debugging tools:
          (if (has-flag? (snip->flags asnip) NEWLINE)
              (begin
                (do-new-line asnip)
-                (send media consistent-snip-lines 'post-do-new-line)
+                (assert (send media consistent-snip-lines 'post-do-new-line))
                #t)
              (begin
                (set-snip-line! asnip mline)