diff options
Diffstat (limited to 'Master/tlpkg')
-rwxr-xr-x | Master/tlpkg/bin/c2l | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/Master/tlpkg/bin/c2l b/Master/tlpkg/bin/c2l index de9666175c3..fecdebe8ce8 100755 --- a/Master/tlpkg/bin/c2l +++ b/Master/tlpkg/bin/c2l @@ -121,7 +121,7 @@ sub main { } my $whole_string = join ("", @lines); - my @page = split (/\f */, $whole_string); + my @page = split (/\f */, $whole_string, 4); my $diff_list = `test -s /tmp/$<.tlplace.diff && sed -n -e 's/^--- //' \\ @@ -132,8 +132,8 @@ sub main { # page 0: build stuff. # page 1: cooked hierarchy. - # page 2: new vs. present. + # page 2: new vs. present (what's interesting). # page 3: place output. - print "$page[2]$diff_list\n\f$page[1]\n\f$page[0]\n\f$page[3]\n"; + print "$page[2]$diff_list\n\f $page[1]\n\f $page[0]\n\f $page[3]\n"; return 0; } |