diff options
author | ivan <ivan> | 2011-04-18 23:15:19 +0000 |
---|---|---|
committer | ivan <ivan> | 2011-04-18 23:15:19 +0000 |
commit | 75162bb14b3e38d66617077843f4dfdcaf09d5c4 (patch) | |
tree | d89dd49a476cf2f0859ed6a0adc2992ea6d69d04 /rt/t/ticket/linking.t | |
parent | fc6209f398899f0211cfcedeb81a3cd65e04a941 (diff) |
import rt 3.8.10
Diffstat (limited to 'rt/t/ticket/linking.t')
-rw-r--r-- | rt/t/ticket/linking.t | 6 |
1 files changed, 3 insertions, 3 deletions
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 = <<END; -open my \$file, "<$filename" or die "couldn't open $filename"; +open( my \$file, '<', "$filename" ) or die "couldn't open $filename"; my \$data = <\$file>; 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; |