original commit: 0e42c95ac1dceb32c8d27f2f91bad86421931776
This commit is contained in:
Matthew Flatt 2002-01-10 22:30:44 +00:00
parent b9e7ec0ea7
commit aeab1cd869

View File

@ -1697,6 +1697,7 @@
(set! fixed-height? #f)
(set-min-height orig-hard)))
(update-size))]
[get-line-count (lambda () (and fixed-height? fixed-height-lines))]
[update-size
(lambda ()
(let ([edit (get-editor)])