diff --git a/collects/mred/edit.ss b/collects/mred/edit.ss
index f9464532..864fb878 100644
--- a/collects/mred/edit.ss
+++ b/collects/mred/edit.ss
@@ -76,7 +76,7 @@
 	     (lambda (v)
 	       (mred:debug:printf 'rewrap "set-auto-set-wrap: ~a" v)
 	       (set! auto-set-wrap? v)
-	       (rewrap))]
+	       (for-each (lambda (c) (send c resize-edit)) canvases))]
 	    
 	    [rewrap
 	     (let ([do-wrap