X-Git-Url: http://git.freeside.biz/gitweb/?p=freeside.git;a=blobdiff_plain;f=rt%2Ft%2Fticket%2Flinking.t;h=fc4761d477a0a18011310c7fb2fe0864f3cdf646;hp=2ea3d58dac34524d628f667278d635c895b81a53;hb=75162bb14b3e38d66617077843f4dfdcaf09d5c4;hpb=fc6209f398899f0211cfcedeb81a3cd65e04a941 diff --git a/rt/t/ticket/linking.t b/rt/t/ticket/linking.t index 2ea3d58da..fc4761d47 100644 --- a/rt/t/ticket/linking.t +++ b/rt/t/ticket/linking.t @@ -38,14 +38,14 @@ my $q2 = RT::Queue->new($RT::SystemUser); ok ($id,$msg); my $commit_code = <; chomp \$data; \$data += 0; close \$file; \$RT::Logger->debug("Data is \$data"); -open \$file, ">$filename" or die "couldn't open $filename"; +open( \$file, '>', "$filename" ) or die "couldn't open $filename"; if (\$self->TransactionObj->Type eq 'AddLink') { \$RT::Logger->debug("AddLink"); print \$file \$data+1, "\n"; @@ -375,7 +375,7 @@ ok($link->LocalBase == 0, "LocalBase set correctly"); sub link_count { my $file = shift; - open my $fh, "<$file" or die "couldn't open $file"; + open ( my $fh, '<', $file ) or die "couldn't open $file"; my $data = <$fh>; close $fh;