From 84991d1a6e92a6f9debbfc00d20ce5e071490350 Mon Sep 17 00:00:00 2001 From: Manuel Pégourié-Gonnard Date: Mon, 5 Apr 2010 08:09:01 +0000 Subject: 'Fix' indentation. git-svn-id: svn://tug.org/texlive/trunk@17701 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf/scripts/tetex/texdoctk.pl | 17 +++++++++-------- 1 file changed, 9 insertions(+), 8 deletions(-) (limited to 'Master/texmf') diff --git a/Master/texmf/scripts/tetex/texdoctk.pl b/Master/texmf/scripts/tetex/texdoctk.pl index 1264f804513..25352c9193e 100755 --- a/Master/texmf/scripts/tetex/texdoctk.pl +++ b/Master/texmf/scripts/tetex/texdoctk.pl @@ -193,12 +193,12 @@ my $deffont=$Qbut->cget(-font); $deffont='Helvetica -16 bold' if &x_resolution > 1200; $Qbut->configure(-font=>$deffont); $tlwins{'mainwindow'}{'buttons'}[1]=$cmdframe->Button( - -text=>'Database search', + -text=>'Database search', -font=>$deffont,%butcol, -command=>[\&mksrch, 0] )->pack(-side=>'left'); $tlwins{'mainwindow'}{'buttons'}[2]=$cmdframe->Button( - -text=>'File search', + -text=>'File search', -font=>$deffont,%butcol, -command=>[\&mksrch, 1] )->pack(-side=>'left'); @@ -763,12 +763,12 @@ sub showpath { sub mksrch { my ($type) = @_; if ($srchflag == 1) { - if ($type == $srchtype) { - destroy $srchentry; - $srchflag=0; - } else { - $srchtype = $type; - } + if ($type == $srchtype) { + destroy $srchentry; + $srchflag=0; + } else { + $srchtype = $type; + } } else { # get the search string $srchentry=$cmdframe->Entry(-cursor=>'xterm', @@ -1806,3 +1806,4 @@ tr@dlc.ku.dk or tex-k@tug.org # mode: perl # auto-fill-hook: do-auto-fill # End: +# vim: ts=8 sw=4 noexpandtab -- cgit v1.2.3