suzanne.soy/racket
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

use the new feature of panel:dragable (from previous commit) to make the

Browse Source 
'put definitions beside interactions' preference changes take effect immediately
This commit is contained in:
Robby Findler 2010-12-09 08:00:19 -06:00
parent 9a485dd492
commit 092b966b83
1 changed files with 2 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
collects/drracket/private/unit.rkt
View File

@ -3928,6 +3928,8 @@ module browser threading seems wrong.
vertical-dragable/def-int%) vertical-dragable/def-int%)
(unit-frame this) (unit-frame this)
(parent panel-with-tabs))] (parent panel-with-tabs))]
[define orientation-callback (λ (p v) (send resizable-panel set-orientation v))]
(preferences:add-callback 'drracket:defs/ints-horizontal orientation-callback #t)
[define definitions-canvas #f] [define definitions-canvas #f]
(initialize-definitions-canvas) (initialize-definitions-canvas)