Skip to content
GitLab
Menu
Projects
Groups
Snippets
Loading...
Help
Help
Support
Community forum
Keyboard shortcuts
?
Submit feedback
Contribute to GitLab
Sign in / Register
Toggle navigation
Menu
Open sidebar
nerrons
purr-data
Commits
fc300bad
Commit
fc300bad
authored
Nov 10, 2014
by
Ivica Bukvic
Browse files
*refined appearance of the startup->new window appearance
parent
8a2db1e2
Changes
1
Hide whitespace changes
Inline
Side-by-side
pd/src/pd.tk
View file @
fc300bad
...
...
@@ -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
...
...
Write
Preview
Markdown
is supported
0%
Try again
or
attach a new file
.
Attach a file
Cancel
You are about to add
0
people
to the discussion. Proceed with caution.
Finish editing this message first!
Cancel
Please
register
or
sign in
to comment