diff options
| author | Siep Kroonenberg <siepo@cybercomm.nl> | 2019-10-15 18:30:20 +0000 |
|---|---|---|
| committer | Siep Kroonenberg <siepo@cybercomm.nl> | 2019-10-15 18:30:20 +0000 |
| commit | 6101fa400d8cbfb5c390b739bd27c5f12cf2383f (patch) | |
| tree | 4d787d7f14d35bf1ab95c8cd241061fdcaf90d34 | |
| parent | b50d5215ade5068a6fc7aac71b67b129a65e657a (diff) | |
A4 => a4
git-svn-id: svn://tug.org/texlive/trunk@52390 c570f23f-e606-0410-a88d-b1316a301751
| -rwxr-xr-x | Master/texmf-dist/scripts/tlshell/tlshell.tcl | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/Master/texmf-dist/scripts/tlshell/tlshell.tcl b/Master/texmf-dist/scripts/tlshell/tlshell.tcl index c34147b4d8e..66752b67cd9 100755 --- a/Master/texmf-dist/scripts/tlshell/tlshell.tcl +++ b/Master/texmf-dist/scripts/tlshell/tlshell.tcl @@ -2105,7 +2105,8 @@ proc populate_main {} { incr inx menu .mn.opt.paper foreach p [list A4 letter] { - .mn.opt.paper add command -label $p -command "set_paper $p" + .mn.opt.paper add command -label $p -command \ + "set_paper [string tolower $p]" } if {[llength $::langs] > 1} { |