svn: r3188
This commit is contained in:
parent
97375b0e74
commit
3c17a310ee
|
@ -113,7 +113,8 @@
|
||||||
(make-object message%
|
(make-object message%
|
||||||
(string-constant version:connecting-server)
|
(string-constant version:connecting-server)
|
||||||
this)
|
this)
|
||||||
(make-object button% (string-constant abort) this
|
(make-object button%
|
||||||
|
(string-constant abort) this
|
||||||
(lambda (b e)
|
(lambda (b e)
|
||||||
(kill-thread t)
|
(kill-thread t)
|
||||||
(send this show #f))
|
(send this show #f))
|
||||||
|
|
Loading…
Reference in New Issue
Block a user