Tweak.
authorSean O'Rourke <seano@foobar.local>
Sat, 12 May 2012 13:46:51 +0000 (12 07:46 -0600)
committerSean O'Rourke <seano@foobar.local>
Sat, 12 May 2012 13:46:51 +0000 (12 07:46 -0600)
lib/Sepia.pm

index 8f3113c..a04fc17 100644 (file)
@@ -878,7 +878,7 @@ sub Dump
 
 sub flow
 {
-    my $width = shift()-1;
+    my $width = shift()-2;
     my $format = "^" . ('<' x $width) . "~~\n";
     local $^A = '';
     formline($format, @_);