[ops] use the same code consistently in example and explanation

Raku · May 15, 2010 · 6858b1d · 6858b1d
1 parent 063bc7a
commit 6858b1d
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/src/operators.pod b/src/operators.pod
@@ -192,7 +192,8 @@ Now all the necessary informations are in place and the chart can be printed:
 =begin programlisting
 
     for @scores {
-        printf "%- {$label-area-width}s%s\n", .key, 'X' x ($unit * .value);
+        my $format = '%- ' ~ $label-area-width ~ "s%s\n";
+        printf $format, .key, 'X' x ($unit * .value);
     }
 
 =end programlisting