diff --git a/pd/src/pd.tk b/pd/src/pd.tk index 80f7846d82822ee860298951cf507458e3aa825a..4309f885410bf5fa719aefe44bc207362b819be3 100644 --- a/pd/src/pd.tk +++ b/pd/src/pd.tk @@ -7693,14 +7693,14 @@ namespace eval dlg_Startup { wm geom .inputBox "450x30" after idle { center_window .inputBox 10 50 } - button .inputBox.cmdOK -text "OK" -command { destroy .inputBox } + match_linux_wm [list button .inputBox.cmdOK -text "OK" -command { destroy .inputBox } ] - entry .inputBox.txtInput -width 50 -textvariable cmd + match_linux_wm [list entry .inputBox.txtInput -width 50 -textvariable cmd ] pdtk_standardkeybindings .inputBox.txtInput bind .inputBox.txtInput <KeyPress-Return> { destroy .inputBox } bind .inputBox.txtInput <KeyPress-Escape> { destroy .inputBox } - pack .inputBox.txtInput -side left -expand 1 -fill x -padx 2m - pack .inputBox.cmdOK -side left + pack .inputBox.txtInput -side left -expand 1 -fill x -padx 3 -pady 3 + pack .inputBox.cmdOK -side left -padx 3 -pady 3 focus .inputBox.txtInput