diff options
Diffstat (limited to 'kiosk-plugin.tcl')
-rw-r--r-- | kiosk-plugin.tcl | 5 |
1 files changed, 5 insertions, 0 deletions
diff --git a/kiosk-plugin.tcl b/kiosk-plugin.tcl index a6ec6f3..c1624b2 100644 --- a/kiosk-plugin.tcl +++ b/kiosk-plugin.tcl @@ -27,6 +27,7 @@ set ::kiosk::config(QuitOnClose) True set ::kiosk::config(PreventClose) True set ::kiosk::config(Bindings) False set ::kiosk::config(QuitBinding) True +set ::kiosk::config(GeometryMain) "" @@ -128,6 +129,10 @@ proc ::kiosk::makekiosk {mywin} { ###### do some global KIOSK-settings +## set the geometry of the Pd window +if { $::kiosk::config(GeometryMain) != "" } { + wm geometry .pdwindow =$::kiosk::config(GeometryMain) +} ## hide the Pd window if { $::kiosk::config(HideMain) } { set ::stderr 1 |