From fc300bad7e704bd986f6c2fc24ba07bd2205f27b Mon Sep 17 00:00:00 2001
From: Ivica Ico Bukvic <ico@vt.edu>
Date: Mon, 10 Nov 2014 11:38:09 -0500
Subject: [PATCH] *refined appearance of the startup->new window appearance
---
pd/src/pd.tk | 8 ++++----
1 file changed, 4 insertions(+), 4 deletions(-)
diff --git a/pd/src/pd.tk b/pd/src/pd.tk
index 80f7846d8..4309f8854 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
--
GitLab