[texlive-nonbin] 06/08: fix tl-paper for new perl modules
This is an automated email from the git hooks/post-receive script.
preining pushed a commit to branch master
in repository texlive-nonbin.
commit e3d207ba3d404c1ed19ac89ead60fef2feb4f32b
Author: Norbert Preining <preining@debian.org>
Date: Thu Jun 25 16:16:08 2015 +0900
fix tl-paper for new perl modules
---
texlive-base/debian/tl-paper | 8 +++++---
1 file changed, 5 insertions(+), 3 deletions(-)
diff --git a/texlive-base/debian/tl-paper b/texlive-base/debian/tl-paper
index 834500d..d3205ca 100644
--- a/texlive-base/debian/tl-paper
+++ b/texlive-base/debian/tl-paper
@@ -5,7 +5,7 @@
# query and change paper settings using TLPaper
# this is independent from tlmgr
#
-# Copyright 2011-2014 Norbert Preining
+# Copyright 2011-2015 Norbert Preining
# This file is licensed under the GNU General Public License version 3
# or any later version.
#
@@ -57,7 +57,8 @@ sub main {
}
# the following actually also *reads* the configuration and returns
# a list where the first item is the one selected.
- my ($current_paper, @other_options) = TeXLive::TLPaper::get_paper_list($prg);
+ my $paperref = TeXLive::TLPaper::get_paper_list($prg);
+ my ($current_paper, @other_options) = @{$paperref};
for my $i ($current_paper, sort @other_options) {
print "$i\n";
}
@@ -107,7 +108,8 @@ sub main {
usage();
exit 1;
}
- my ($current_paper, @other_options) = TeXLive::TLPaper::get_paper_list($prg);
+ my $paperref = TeXLive::TLPaper::get_paper_list($prg);
+ my ($current_paper, @other_options) = @{$paperref};
print "$current_paper\n" if defined($current_paper);
} else {
--
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/debian-tex/texlive-nonbin.git
Reply to: