From 6858b1d1db707db95d6e1040f005d0f9254e3dbc Mon Sep 17 00:00:00 2001 From: Moritz Lenz Date: Sat, 15 May 2010 16:24:44 +0200 Subject: [PATCH] [ops] use the same code consistently in example and explanation --- src/operators.pod | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/src/operators.pod b/src/operators.pod index 6696da9..c8d5d38 100644 --- 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