bring down below 102 cols

This commit is contained in:
Robby Findler 2013-10-25 09:04:05 -05:00
parent aa3bef0468
commit 478df11069

View File

@ -1582,7 +1582,8 @@
(new text-field%
[parent logger-gui-content-panel]
[label "level@name ..."]
[init-value (send (get-interactions-text) get-user-log-receiver-args-str)]
[init-value
(send (get-interactions-text) get-user-log-receiver-args-str)]
[callback
(λ (tf evt)
(define str (send (send tf get-editor) get-text))