summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorNorbert Preining <preining@logic.at>2008-09-22 23:35:04 +0000
committerNorbert Preining <preining@logic.at>2008-09-22 23:35:04 +0000
commit8f91d1d00eb2808ad1c66475c1769f3884622f44 (patch)
tree2b7da5a420bab12aa03cf68ccb6d770c7ca770d2
parentf908c5b8bf8a316c9f2213878e9824ed6b6e4a9b (diff)
add a patch to allow continuation lines in tlpsrc files
git-svn-id: svn://tug.org/texlive/trunk@10695 c570f23f-e606-0410-a88d-b1316a301751
-rw-r--r--Master/tlpkg/etc/allow-continuation-lines-in-tlpsrc.diff30
1 files changed, 30 insertions, 0 deletions
diff --git a/Master/tlpkg/etc/allow-continuation-lines-in-tlpsrc.diff b/Master/tlpkg/etc/allow-continuation-lines-in-tlpsrc.diff
new file mode 100644
index 00000000000..d4ea539611a
--- /dev/null
+++ b/Master/tlpkg/etc/allow-continuation-lines-in-tlpsrc.diff
@@ -0,0 +1,30 @@
+Index: TLPSRC.pm
+===================================================================
+--- TLPSRC.pm (revision 10694)
++++ TLPSRC.pm (working copy)
+@@ -68,10 +68,25 @@
+ my (@runpatterns, @docpatterns, @binpatterns, @srcpatterns);
+ my $started = 0;
+ my $finished = 0;
++ my $savedline = "";
+
+ foreach my $line (@lines) {
++ # we allow continuation lines in tlpsrc files, i.e., lines with a \ at
++ # the end
++ if ($line =~ /^(.*)\\$/) {
++ $savedline .= "$1";
++ next;
++ }
++ if ($savedline ne "") {
++ # we are in a continuation line
++ $line = "$savedline$line";
++ $savedline = "";
++ }
++
+ $line =~ /^\s*#/ && next; # skip comment lines
+ next if $line =~ /^\s*$/; # skip blank lines
++
++
+ # (blank lines are significant in tlpobj, but not tlpsrc)
+
+ if ($line =~ /^ /) {