diff options
author | Norbert Preining <preining@logic.at> | 2008-07-31 19:31:53 +0000 |
---|---|---|
committer | Norbert Preining <preining@logic.at> | 2008-07-31 19:31:53 +0000 |
commit | 5a57b804e08ff83dbcafca27e4249dc2b898b55e (patch) | |
tree | 2d018cbc0aaf73296d16d46fec05e0d6fc65e8b7 /Master/tlpkg | |
parent | cfab3328dc710c44fad7db4b6b10fba41b5b4a2e (diff) |
TLPostInstall.pm: Fix installation of documentation into the menu on win32:
- some docs are renamed from live.pdf to texlive-en.pdf
- install the html also into the menu if possible
- rename texlive-ge to texlive-de
git-svn-id: svn://tug.org/texlive/trunk@9952 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/tlpkg')
-rw-r--r-- | Master/tlpkg/TeXLive/TLPostActions.pm | 42 |
1 files changed, 30 insertions, 12 deletions
diff --git a/Master/tlpkg/TeXLive/TLPostActions.pm b/Master/tlpkg/TeXLive/TLPostActions.pm index 2000b477917..9f23c6ed4ba 100644 --- a/Master/tlpkg/TeXLive/TLPostActions.pm +++ b/Master/tlpkg/TeXLive/TLPostActions.pm @@ -268,9 +268,17 @@ sub do_install_texlive_en { if (win32()) { add_menu_shortcut( $mainmenu, - 'TeX Live Manual (en)', + 'TeX Live Manual (en) (HTML)', '', # default pdf icon - $texdir.'/texmf-doc/doc/english/texlive-en/live.pdf', + $texdir.'/texmf-doc/doc/english/texlive-en/texlive-en.html', + '', + '', + ); + add_menu_shortcut( + $mainmenu, + 'TeX Live Manual (en) (PDF)', + '', # default pdf icon + $texdir.'/texmf-doc/doc/english/texlive-en/texlive-en.pdf', '', '', ); @@ -279,7 +287,8 @@ sub do_install_texlive_en { sub do_remove_texlive_en { my ($texdir) = @_; if (win32()) { - remove_menu_shortcut($mainmenu,'TeX Live Manual (en)'); + remove_menu_shortcut($mainmenu,'TeX Live Manual (en) (HTML)'); + remove_menu_shortcut($mainmenu,'TeX Live Manual (en) (PDF)'); } } $PostInstall{'texlive-en'} = \&do_install_texlive_en; @@ -318,9 +327,17 @@ sub do_install_texlive_fr { if (win32()) { add_menu_shortcut( $mainmenu, - 'TeX Live Manual (fr)', + 'TeX Live Manual (fr) (PDF)', + '', # default pdf icon + $texdir.'/texmf-doc/doc/french/texlive-fr/texlive-fr.pdf', + '', + '', + ); + add_menu_shortcut( + $mainmenu, + 'TeX Live Manual (fr) (HTML)', '', # default pdf icon - $texdir.'/texmf-doc/doc/french/texlive-fr/live.pdf', + $texdir.'/texmf-doc/doc/french/texlive-fr/texlive-fr.html', '', '', ); @@ -329,36 +346,37 @@ sub do_install_texlive_fr { sub do_remove_texlive_fr { my ($texdir) = @_; if (win32()) { - remove_menu_shortcut($mainmenu,'TeX Live Manual (fr)'); + remove_menu_shortcut($mainmenu,'TeX Live Manual (fr) (HTML)'); + remove_menu_shortcut($mainmenu,'TeX Live Manual (fr) (PDF)'); } } $PostInstall{'texlive-fr'} = \&do_install_texlive_fr; $PostRemove{'texlive-fr'} = \&do_remove_texlive_fr; # -# texlive-ge +# texlive-de # -sub do_install_texlive_ge { +sub do_install_texlive_de { my ($texdir) = @_; if (win32()) { add_menu_shortcut( $mainmenu, 'TeX Live Manual (de)', '', # default pdf icon - $texdir.'/texmf-doc/doc/german/texlive-ge/live.pdf', + $texdir.'/texmf-doc/doc/german/texlive-de/live.pdf', '', '', ); } } -sub do_remove_texlive_ge { +sub do_remove_texlive_de { my ($texdir) = @_; if (win32()) { remove_menu_shortcut($mainmenu,'TeX Live Manual (de)'); } } -$PostInstall{'texlive-ge'} = \&do_install_texlive_ge; -$PostRemove{'texlive-ge'} = \&do_remove_texlive_ge; +$PostInstall{'texlive-de'} = \&do_install_texlive_de; +$PostRemove{'texlive-de'} = \&do_remove_texlive_de; # # texlive-pl |