fixed wrapping bug

original commit: 5a6d43f07b5f763173e0edb2f519c1d19fb195a2
This commit is contained in:
Robby Findler 1996-11-10 21:54:51 +00:00
parent 21c1a31e1c
commit e0597481ed

View File

@ -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