diff options
author | Norbert Preining <preining@logic.at> | 2008-07-31 20:16:40 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-07-31 20:16:40 +0000 |
commit | 2925206bd2213cd380b37045bcfc857e8eac3f6e (patch) | |
tree | 857299f3ca3965cfc75ae21665a7e852142bcbd9 | |
parent | a8c30fdace4f04f87f1db99c0da824baaa44a123 (diff) |
TLPostAction: only link the toplevel index.html into the win32 menu
git-svn-id: svn://tug.org/texlive/trunk@9955 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r-- | Master/tlpkg/TeXLive/TLPostActions.pm | 24 |
1 files changed, 3 insertions, 21 deletions
diff --git a/Master/tlpkg/TeXLive/TLPostActions.pm b/Master/tlpkg/TeXLive/TLPostActions.pm index 9d56f21cf31..432a87c7b05 100644 --- a/Master/tlpkg/TeXLive/TLPostActions.pm +++ b/Master/tlpkg/TeXLive/TLPostActions.pm @@ -269,36 +269,18 @@ sub do_install_texlive_infra { if (win32()) { add_menu_shortcut( $mainmenu, - 'TeX Live Readme (en)', + 'TeX Live Toplevel Readme Index', '', # default pdf icon - $texdir.'/readme.html/readme.en.html', + $texdir.'/index.html', '', '', ); - # try to also install the national language document - my $lang = TeXLive::TLWinGoo::reg_country(); - if ($lang) { - if (-r "$texdir/readme.html/readme.$lang.html") { - add_menu_shortcut( - $mainmenu, - "TeX Live Readme ($lang)", - '', # without anything default icon - $texdir."/readme.html/readme.$lang.html", - '', - '', - ); - } - } } } sub do_remove_texlive_infra { my ($texdir) = @_; if (win32()) { - remove_menu_shortcut($mainmenu,'TeX Live Readme (en)'); - my $lang = TeXLive::TLWinGoo::reg_country(); - if ($lang) { - remove_menu_shortcut($mainmenu,"TeX Live Readme ($lang)"); - } + remove_menu_shortcut($mainmenu,'TeX Live Toplevel Readme Index'); } } $PostInstall{'texlive.infra'} = \&do_install_bin_texlive_infra; |