You are viewing a plain text version of this content. The canonical link for it is here.
Posted to commits@openoffice.apache.org by jo...@apache.org on 2011/07/05 00:29:50 UTC
svn commit: r1142832 - /incubator/ooo/site/trunk/lib/view.pm
Author: joes
Date: Mon Jul 4 22:29:49 2011
New Revision: 1142832
URL: http://svn.apache.org/viewvc?rev=1142832&view=rev
Log:
careful to throw away end here
Modified:
incubator/ooo/site/trunk/lib/view.pm
Modified: incubator/ooo/site/trunk/lib/view.pm
URL: http://svn.apache.org/viewvc/incubator/ooo/site/trunk/lib/view.pm?rev=1142832&r1=1142831&r2=1142832&view=diff
==============================================================================
--- incubator/ooo/site/trunk/lib/view.pm (original)
+++ incubator/ooo/site/trunk/lib/view.pm Mon Jul 4 22:29:49 2011
@@ -200,7 +200,7 @@ sub sort_tables {
my @rows;
push @rows, [split /\s*\|\s*/, shift(@orig), -1]
while $orig[0] =~ /^\|/;
- shift @$_ for @rows; # dump empty entry at front
+ shift @$_, pop @$_ for @rows; # dump empty entries at ends
@rows = sort { $a->[$col] cmp $b->[$col] } @rows;
@rows = reverse @rows if $direction == -1;
push @out, map "| " . join(" | ", @$_) . " |", @rows;