perl-Glib-tests.patch

   1 Something started to strip ending newlines from comments...
   2 --- Glib-1.329/t/g.t.orig       2012-01-06 07:26:40.000000000 +0100
   3 +++ Glib-1.329/t/g.t    2019-07-02 22:02:39.461858950 +0200
   4 @@ -84,7 +84,7 @@
   5         eq_array (\@bools, [FALSE, TRUE, FALSE]);
   6
   7         ok ($key_file->has_group('locales'));
   8 -       is ($key_file->get_comment('locales', 'mystring'), "some string\n");
   9 +       is ($key_file->get_comment('locales', 'mystring'), "some string");
  10         is ($key_file->get_string('locales', 'mystring'), 'Good morning');
  11         is ($key_file->get_locale_string('locales', 'mystring', 'it'), 'Buongiorno');
  12
  13 @@ -94,11 +94,11 @@
  14         $key_file->set_string_list('listsection', 'stringlist', 'one', 'two', 'three');
  15         $key_file->set_locale_string('locales', 'mystring', 'en', 'one');
  16         $key_file->set_comment('locales', 'mystring', 'comment');
  17 -       is ($key_file->get_comment('locales', 'mystring'), "comment\n");
  18 +       is ($key_file->get_comment('locales', 'mystring'), "comment");
  19         $key_file->set_comment('locales', undef, "another comment\n");
  20         is ($key_file->get_comment('locales', undef), "#another comment\n#");
  21         $key_file->set_comment(undef, undef, 'one comment more');
  22 -       is ($key_file->get_comment(undef, undef), "one comment more\n");
  23 +       is ($key_file->get_comment(undef, undef), "one comment more");
  24         $key_file->set_boolean($start_group, 'boolkey', FALSE);
  25         $key_file->set_value($start_group, 'boolkey', '0');
  26