X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=blobdiff_plain;f=t%2F04file%2Cfh%2Cstring.t;h=91214122795074a700f75cdae227dc3016fd2086;hb=84ef6e4e04d8beed11b86c54a3a7759cb772bcae;hp=7e4d7b0e49b9dbaec127e0048479d70eeb6c84a2;hpb=31cf3a5441c7796b09b5609fa70d92d5c3e2d200;p=dbsrgits%2FSQL-Translator.git diff --git a/t/04file,fh,string.t b/t/04file,fh,string.t index 7e4d7b0..9121412 100644 --- a/t/04file,fh,string.t +++ b/t/04file,fh,string.t @@ -37,8 +37,7 @@ my ($v1, $v2); } # XXX- Hack to remove Graph hack! -delete $v1->{translator}; -delete $v2->{translator}; +$_->translator (undef) for ($v1, $v2); ok(length $v1, "passing string (filename) works"); ok(length $v2, "passing string as SCALAR reference");