From 9ba25e1b7bd8a807da4804d6ebd96d136a7ab46b Mon Sep 17 00:00:00 2001
From: hjp <hjp>
Date: Mon, 3 May 2004 09:07:03 +0000
Subject: [PATCH] Shut up some warnings.

---
 t/0basic.t | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/t/0basic.t b/t/0basic.t
index 80790f1..79a406a 100644
--- a/t/0basic.t
+++ b/t/0basic.t
@@ -43,7 +43,7 @@ if (length($g) > 0 && substr($g, 0, 4) eq "\211PNG") {
 
 $test = 4;
 $ts->output_format("gif");
-my $g = $ts->plot();
+$g = $ts->plot();
 # print STDERR "length \$g = ", length($g), "\n";
 if (length($g) > 0 && substr($g, 0, 6) eq "GIF87a") {
     print "ok $test\n";
@@ -53,7 +53,7 @@ if (length($g) > 0 && substr($g, 0, 6) eq "GIF87a") {
 
 $test = 5;
 $ts->output_format("jpeg");
-my $g = $ts->plot();
+$g = $ts->plot();
 # print STDERR "length \$g = ", length($g), "\n";
 if (length($g) > 0 && substr($g, 0, 10) eq "\377\330\377\340\000\020JFIF") {
     print "ok $test\n";
@@ -63,7 +63,7 @@ if (length($g) > 0 && substr($g, 0, 10) eq "\377\330\377\340\000\020JFIF") {
 
 $test = 6;
 $ts->output_format("ps");
-my $g = $ts->plot();
+$g = $ts->plot();
 # print STDERR "length \$g = ", length($g), "\n";
 if (length($g) > 0 && substr($g, 0, 2) eq "%!") {
     print "ok $test\n";