Removes complaints when the string to print has dollars.

2010-05-27 16:24:09 +01:00
parent 5ad3391be2
commit a24f6371ac
1 changed files with 1 additions and 1 deletions
--- a/src/cap5/capr.pl
+++ b/src/cap5/capr.pl
@@ -286,7 +286,7 @@ sub printField {
        $col = 0;
    }

-    print sprintf("$outStr%*s",$pad," ");
+    print $outStr . sprintf("%*s",$pad," ");
    $col = $col + $wide;

    return($col);