.
original commit: c9bb925882269ff05986619054fd1bf0308b9dc3
This commit is contained in:
parent
9894626fdb
commit
f3c42c9b4f
|
@ -580,7 +580,7 @@
|
|||
|
||||
(define hierarchical-list%
|
||||
(class100 editor-canvas% (parent [style '(no-hscroll)])
|
||||
(inherit min-width min-height)
|
||||
(inherit min-width min-height allow-tab-exit)
|
||||
(rename [super-on-char on-char]
|
||||
[super-on-focus on-focus])
|
||||
(public
|
||||
|
@ -751,6 +751,7 @@
|
|||
[selected-item #f])
|
||||
(sequence
|
||||
(super-init parent top-buffer style)
|
||||
(allow-tab-exit #t)
|
||||
(send top-buffer set-cursor arrow-cursor)
|
||||
(min-width 150)
|
||||
(min-height 200)))))))
|
||||
|
|
Loading…
Reference in New Issue
Block a user