diff options
author | Norbert Preining <norbert@preining.info> | 2021-01-17 03:02:33 +0000 |
---|---|---|
committer | Norbert Preining <norbert@preining.info> | 2021-01-17 03:02:33 +0000 |
commit | 8591b56496b93eed20f638ee1ce46b11c3f7be58 (patch) | |
tree | b2afe58ae1a4b7b138a752410d3d7232485a4f9d /systems/texlive/tlnet/tlpkg/tltcl | |
parent | 07a2495c5aecc2f871625ae63d25ee1cc18b2ca5 (diff) |
CTAN sync 202101170302
Diffstat (limited to 'systems/texlive/tlnet/tlpkg/tltcl')
-rw-r--r-- | systems/texlive/tlnet/tlpkg/tltcl/tltcl.tcl | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/systems/texlive/tlnet/tlpkg/tltcl/tltcl.tcl b/systems/texlive/tlnet/tlpkg/tltcl/tltcl.tcl index ff5c273c05..562b148125 100644 --- a/systems/texlive/tlnet/tlpkg/tltcl/tltcl.tcl +++ b/systems/texlive/tlnet/tlpkg/tltcl/tltcl.tcl @@ -478,11 +478,11 @@ set gry [ttk::style lookup TButton -foreground disabled] # 'default' padding proc ppack {wdg args} { ; # pack command with padding - pack $wdg {*}$args -padx 3 -pady 3 + pack $wdg {*}$args -padx 3pt -pady 3pt } proc pgrid {wdg args} { ; # grid command with padding - grid $wdg {*}$args -padx 3 -pady 3 + grid $wdg {*}$args -padx 3pt -pady 3pt } # unicode symbols as fake checkboxes in ttk::treeview widgets @@ -664,7 +664,7 @@ if {$::tcl_platform(platform) eq "unix"} { wm title .browser [__ "Browse..."] # wallpaper - pack [ttk::frame .browser.bg -padding 3] -fill both -expand 1 + pack [ttk::frame .browser.bg -padding 3pt] -fill both -expand 1 # ok and cancel buttons pack [ttk::frame .browser.fr1] \ |