--- trunk/lib/Frey/Web.pm 2008/11/28 23:34:26 611 +++ trunk/lib/Frey/Web.pm 2008/11/29 00:06:11 613 @@ -532,8 +532,10 @@ $msg = qq|$msg|; } - $msg .= $spacer . - qq|+$line\n|; + #$msg .= $spacer . qq|$line\n|; + $msg = qq|$line$msg| + . ( $spacer ? $spacer : '' ) + . "\n"; # XXX
 needs this
 
 			$warnings[ $pos++ % $max ] = $msg;
 		}
@@ -544,7 +546,7 @@
 	my $size = -s $path;
 
 	my $warnings = join("",
-		map { $warnings[ ( $pos + $_ ) % $max ] || '' } 1 .. $max 
+		map { $warnings[ ( $pos + $_ ) % $max ] || '' } 0 .. ( $max - 1 )
 	);
 
 	my $s = length($warnings);