diff options
| author | Manuel Pégourié-Gonnard <mpg@elzevir.fr> | 2010-04-05 08:08:51 +0000 |
|---|---|---|
| committer | Manuel Pégourié-Gonnard <mpg@elzevir.fr> | 2010-04-05 08:08:51 +0000 |
| commit | 4476c7d9b82f603eb7a092f822ff200012c64dd1 (patch) | |
| tree | a09d13bdae973cbe490f7b4b5feee3aa2a86d255 | |
| parent | a99f0f32945f074b725ea74129f8223e14b0bef1 (diff) | |
New buttons for texdoc search.
git-svn-id: svn://tug.org/texlive/trunk@17698 c570f23f-e606-0410-a88d-b1316a301751
| -rwxr-xr-x | Master/texmf/scripts/tetex/texdoctk.pl | 13 |
1 files changed, 9 insertions, 4 deletions
diff --git a/Master/texmf/scripts/tetex/texdoctk.pl b/Master/texmf/scripts/tetex/texdoctk.pl index e1c9658f79c..234303297d7 100755 --- a/Master/texmf/scripts/tetex/texdoctk.pl +++ b/Master/texmf/scripts/tetex/texdoctk.pl @@ -192,15 +192,20 @@ my $deffont=$Qbut->cget(-font); $deffont='Helvetica -16 bold' if &x_resolution > 1200; $Qbut->configure(-font=>$deffont); $tlwins{'mainwindow'}{'buttons'}[1]=$cmdframe->Button( - -text=>'Search texdoctk\'s database', + -text=>'Database search', -font=>$deffont,%butcol, -command=>\&mksrch )->pack(-side=>'left'); -$tlwins{'mainwindow'}{'buttons'}[2]=$cmdframe->Button(-text=>'Help/About', +$tlwins{'mainwindow'}{'buttons'}[2]=$cmdframe->Button( + -text=>'File search', + -font=>$deffont,%butcol, + -command=>\&mksrch + )->pack(-side=>'left'); +$tlwins{'mainwindow'}{'buttons'}[3]=$cmdframe->Button(-text=>'Help/About', -font=>$deffont,%butcol, -command=>\&helptext )->pack(-side=>'right'); -$tlwins{'mainwindow'}{'buttons'}[3]=$cmdframe->Button(-text=>'Settings', +$tlwins{'mainwindow'}{'buttons'}[4]=$cmdframe->Button(-text=>'Settings', -font=>$deffont,%butcol, -command=>\&settings )->pack(-side=>'right'); @@ -237,7 +242,7 @@ if ($special == 0) { } else { $ncat=$nbutt; } -for ($i=0,$j=4; $i<@catg; ++$i,++$j) { +for ($i=0,$j=5; $i<@catg; ++$i,++$j) { $tlwins{'mainwindow'}{'buttons'}[$j]=$catg[$i]; } MainLoop; |