diff options
-rw-r--r-- | Master/texmf/scripts/texlive/tlmgrgui/guinb1.pl | 11 | ||||
-rw-r--r-- | Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui2.pl | 2 |
2 files changed, 6 insertions, 7 deletions
diff --git a/Master/texmf/scripts/texlive/tlmgrgui/guinb1.pl b/Master/texmf/scripts/texlive/tlmgrgui/guinb1.pl index 5a775db3d3d..674a2268735 100644 --- a/Master/texmf/scripts/texlive/tlmgrgui/guinb1.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui/guinb1.pl @@ -82,13 +82,12 @@ $back_f1_f21_lb->bind('<<ListboxSelect>>', my $pkgname = $allpackages[$selind[0]]; $pkgname =~ s/^\s*(\(i\) )?//; my $tlp = $tlmediatlpdb->get_package($pkgname); - $longdesc = $tlmediatlpdb->get_package($pkgname)->longdesc; + my $longdesc = $tlmediatlpdb->get_package($pkgname)->longdesc; + my $shortdesc = $tlmediatlpdb->get_package($pkgname)->shortdesc; + $longdesc || $longdesc = "(no short description available)"; + $shortdesc || $shortdesc = "(no long description available)"; $back_f1_f33_t->delete("0.0", "end"); - if (defined($longdesc)) { - $back_f1_f33_t->insert("0.0", "$longdesc"); - } else { - $back_f1_f33_t->insert("0.0", ""); - } + $back_f1_f33_t->insert("0.0", "$shortdesc\n\n$longdesc"); }); # scrollbar .back.f1.f21.scrx -command ".back.f1.f21.lb xview" -orient horizontal $back_f1_f21_scrx = $back_f1_f21->Scrollbar( diff --git a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui2.pl b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui2.pl index ddd74a939c8..1951db56434 100644 --- a/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui2.pl +++ b/Master/texmf/scripts/texlive/tlmgrgui/tlmgrgui2.pl @@ -13,7 +13,7 @@ BEGIN { $^W = 1; $Master = `kpsewhich -var-value=SELFAUTOPARENT`; chomp($Master); - unshift (@INC, "$Master/tlpkg"); + unshift (@INC, "$Master/tlpkg", "$Master/texmf/script/texlive/tlmgrgui"); } use TeXLive::TLMedia; |