fix a warning

diff --git a/t/t38ft2font.t b/t/t38ft2font.t
index c08f2d15f199aaa009346772b0dc2e4be323b37a..7dcd4490c5e0386a2e5dac88c87faa7791cbc380 100644 (file)
--- a/t/t38ft2font.t
+++ b/t/t38ft2font.t
@@ -239,7 +239,7 @@ SKIP:
            "check display width (roughly)");
 
     # check with a char that fits inside the box
-    my $bbox = $exfont->bounding_box(string=>"!", size=>100);
+    $bbox = $exfont->bounding_box(string=>"!", size=>100);
     print "# pos width ", $bbox->pos_width, "\n";
     is($bbox->pos_width, $bbox->advance_width, 
        "check backwards compatibility");