...
original commit: b990cf42265833882615f39335a2a5d75517ec3d
This commit is contained in:
parent
af82a8ad61
commit
c740d3bc76
|
@ -1081,7 +1081,7 @@
|
|||
(send memory-text end-edit-sequence))]
|
||||
[button (make-object button% "Memory" panel
|
||||
(lambda x
|
||||
(collect-garbage)(collect-garbage)(collect-garbage)
|
||||
(collect-garbage)
|
||||
(update-text)))]
|
||||
[ec (make-object editor-canvas% panel memory-text '(no-hscroll no-vscroll))])
|
||||
(determine-width "000000000" ec memory-text)
|
||||
|
|
Loading…
Reference in New Issue
Block a user