actually; scalars shouldn't encode anyway. Not sure what I was thinking.

[debbugs.git] / Debbugs / Common.pm

diff --git a/Debbugs/Common.pm b/Debbugs/Common.pm
index 279893c135bb98a4fda11d8dbd652cb2ffc64e10..4595433a04b01d363f7d1978dc3e22b46db5245f 100644 (file)
--- a/Debbugs/Common.pm
+++ b/Debbugs/Common.pm
@@ -825,7 +825,7 @@ sub globify_scalar {
          if (defined ref($scalar)) {
               if (ref($scalar) eq 'SCALAR' and
                   not UNIVERSAL::isa($scalar,'GLOB')) {
-                   open $handle, '>:scalar:utf8', $scalar;
+                   open $handle, '>:scalar', $scalar;
                    return $handle;
               }
               else {
@@ -839,7 +839,7 @@ sub globify_scalar {
               carp "Given a non-scalar reference, non-glob to globify_scalar; returning /dev/null handle";
          }
      }
-     return IO::File->new('/dev/null','>:utf8');
+     return IO::File->new('/dev/null','>:encoding(UTF-8)');
 }
 
 =head2 cleanup_eval_fail()