perl-Glib-test.patch

   1 --- Glib-1.300/t/options.t.orig 2013-01-15 07:47:46.000000000 +0100
   2 +++ Glib-1.300/t/options.t      2013-06-22 21:59:16.662022960 +0200
   3 @@ -9,7 +9,7 @@
   4  unless (Glib -> CHECK_VERSION (2, 6, 0)) {
   5    plan skip_all => 'the option stuff is new in 2.6';
   6  } else {
   7 -  plan tests => 33;
   8 +  plan tests => 29;
   9  }
  10
  11  # --------------------------------------------------------------------------- #
  12 @@ -155,17 +155,6 @@
  13      is_deeply ($filename_array, [qw(/usr/bin/bla ./harness)]);
  14    }
  15
  16 -  # Test that there is no double-encoding for utf8-encoded strings.
  17 -  {
  18 -    @ARGV = qw(-s ❤ ❤);
  19 -    $context -> parse();
  20 -
  21 -    is ($string, '❤');
  22 -    is (length $string, 1);
  23 -
  24 -    is ($ARGV[0], '❤');
  25 -    is (length $ARGV[0], 1);
  26 -  }
  27  }
  28
  29  # --------------------------------------------------------------------------- #