From 5b67b6be319910126e12745ffbb06a2c1d5f573a Mon Sep 17 00:00:00 2001 From: Norbert Preining Date: Sat, 23 Apr 2016 13:36:44 +0000 Subject: tlmgr gui: fix paper usage git-svn-id: svn://tug.org/texlive/trunk@40702 c570f23f-e606-0410-a88d-b1316a301751 --- Master/texmf-dist/scripts/texlive/tlmgrgui.pl | 13 +++++++------ 1 file changed, 7 insertions(+), 6 deletions(-) (limited to 'Master/texmf-dist') diff --git a/Master/texmf-dist/scripts/texlive/tlmgrgui.pl b/Master/texmf-dist/scripts/texlive/tlmgrgui.pl index 436b4008e61..51936a78d54 100755 --- a/Master/texmf-dist/scripts/texlive/tlmgrgui.pl +++ b/Master/texmf-dist/scripts/texlive/tlmgrgui.pl @@ -1282,30 +1282,31 @@ sub apply_settings_changes { sub init_paper_xdvi { if (!win32()) { $papers{"xdvi"} = TeXLive::TLPaper::get_paper_list("xdvi"); - $currentpaper{"xdvi"} = ${$papers{"xdvi"}}[0]; + $currentpaper{"xdvi"} = $papers{"xdvi"}->[0]; } } sub init_paper_pdftex { $papers{"pdftex"} = TeXLive::TLPaper::get_paper_list("pdftex"); - $currentpaper{"pdftex"} = ${$papers{"pdftex"}}[0]; + $currentpaper{"pdftex"} = $papers{"pdftex"}->[0]; } sub init_paper_dvips { $papers{"dvips"} = TeXLive::TLPaper::get_paper_list("dvips"); - $currentpaper{"dvips"} = ${$papers{"dvips"}}[0]; + $currentpaper{"dvips"} = $papers{"dvips"}->[0]; } sub init_paper_context { if (defined($localtlpdb->get_package("bin-context"))) { $papers{"context"} = TeXLive::TLPaper::get_paper_list("context"); - $currentpaper{"context"} = ${$papers{"context"}}[0]; + $currentpaper{"context"} = $papers{"context"}->[0]; } } sub init_paper_dvipdfmx { $papers{"dvipdfmx"} = TeXLive::TLPaper::get_paper_list("dvipdfmx"); - $currentpaper{"dvipdfmx"} = ${$papers{"dvipdfmx"}}[0]; + $currentpaper{"dvipdfmx"} = $papers{"dvipdfmx"}->[0]; } + sub init_paper_psutils { $papers{"psutils"} = TeXLive::TLPaper::get_paper_list("psutils"); - $currentpaper{"psutils"} = ${$papers{"psutils"}}[0]; + $currentpaper{"psutils"} = $papers{"psutils"}->[0]; } -- cgit v1.2.3