Bug#626785: texdoctk: display "sh: acroread: not found" ==> Why NON-FREE as default
tags 626785 patch
thanks
Hi,
Besides, texdoctk script's set-up dialog was too tall even for XGA
screen. This made it impossible to click OK to change setting away
from NON-FREE acroread to something else.
Attached patch to dialog script should make setup screen to fit to XGA
screen, at last.
This may still be too wide for SVGA screen but usually top bar can be
used to slide sideway.
Please consider to apply this. (Also consider to change
/etc/texmf/texdoctk/texdocrc.defaults initial value too.)
Osamu
--- texdoctk.orig 2011-05-15 21:13:50.277551259 +0900
+++ texdoctk 2011-05-15 21:56:42.021552255 +0900
@@ -942,12 +942,18 @@
my $setmenu=$main->Toplevel(-title=>'Settings');
$setmenu->resizable(0,0);
$tlwins{"setmenu"}{'addr'}=$setmenu;
+# 2 column
+ my $setmenuw=$setmenu->Frame()->pack(-side=>'left',
+ -anchor=>'n');
+ my $setmenue=$setmenu->Frame()->pack(-side=>'right',
+ -anchor=>'n',
+ -ipady=>6);
# documentation path
my $datlabel;
$datlabel="Database file(s) used: teTeX";
$datlabel.=", local database" if (-e $locdatabase);
$datlabel.=", user database" if (-e $homedatabase);
- my $docframe=$setmenu->Frame(-relief=>'groove',
+ my $docframe=$setmenuw->Frame(-relief=>'groove',
-borderwidth=>2)->pack(-side=>'top',
-fill=>'x',
-expand=>1);
@@ -978,7 +984,7 @@
-fill=>'x',
-expand=>1);
# General viewer behaviour
- my $genvframe=$setmenu->Frame(-label=>'General viewer behaviour',
+ my $genvframe=$setmenuw->Frame(-label=>'General viewer behaviour',
-relief=>'groove',
-borderwidth=>2)->pack(-side=>'top',
-fill=>'x',
@@ -1020,7 +1026,7 @@
},
-font=>$deffont,%butcol)->pack(-side=>'right');
# DVI
- my $dviframe=$setmenu->Frame(-label=>'DVI',
+ my $dviframe=$setmenuw->Frame(-label=>'DVI',
-relief=>'groove',
-borderwidth=>2)->pack(-side=>'top',
-fill=>'x',
@@ -1047,7 +1053,7 @@
-font=>$deffont)->pack(-side=>'left',
-anchor=>'sw');
# PostScript
- my $psframe=$setmenu->Frame(-label=>'PostScript',
+ my $psframe=$setmenuw->Frame(-label=>'PostScript',
-relief=>'groove',
-borderwidth=>2)->pack(-side=>'top',
-fill=>'x',
@@ -1059,7 +1065,7 @@
my $psventry=$psframe->Entry(-textvariable=>\$ps_viewer_tmp,
-font=>$deffont)->pack(-side=>'left');
# PDF
- my $pdfframe=$setmenu->Frame(-label=>'PDF',
+ my $pdfframe=$setmenue->Frame(-label=>'PDF',
-relief=>'groove',
-borderwidth=>2)->pack(-side=>'top',
-fill=>'x',
@@ -1082,7 +1088,7 @@
-font=>$deffont)->pack(-side=>'left',
-anchor=>'sw');
# HTML
- my $htmlframe=$setmenu->Frame(-label=>'HTML',
+ my $htmlframe=$setmenue->Frame(-label=>'HTML',
-relief=>'groove',
-borderwidth=>2)->pack(-side=>'top',
-fill=>'x',
@@ -1111,7 +1117,7 @@
Checkbutton(-variable=>\$htmlps_redir_tmp)->pack(-side=>'left',
-anchor=>'sw');
# plain text
- my $txtframe=$setmenu->Frame(-label=>'Plain text',
+ my $txtframe=$setmenue->Frame(-label=>'Plain text',
-relief=>'groove',
-borderwidth=>2)->pack(-side=>'top',
-fill=>'x',
@@ -1164,7 +1170,7 @@
Checkbutton(-variable=>\$txtps_redir_tmp)->pack(-side=>'left',
-anchor=>'sw');
# printer
- my $prtframe=$setmenu->Frame(-label=>'Printer',
+ my $prtframe=$setmenue->Frame(-label=>'Printer',
-relief=>'groove',
-borderwidth=>2)->pack(-side=>'top',
-fill=>'x',
@@ -1176,7 +1182,7 @@
my $prtcentry=$prtframe->Entry(-textvariable=>\$print_cmd_tmp,
-font=>$deffont)->pack(-side=>'left');
# buttons and key bindings
- my $setbfr=$setmenu->Frame()->pack(-side=>'bottom');
+ my $setbfr=$setmenue->Frame()->pack(-side=>'bottom');
$tlwins{'setmenu'}{'buttons'}[1]=
$setbfr->Button(-text=>'OK',
-font=>$deffont,%butcol,
Reply to: