perl-Glib r1060 - in trunk: . t



Author: tsch
Date: Sun Jan 18 15:10:47 2009
New Revision: 1060
URL: http://svn.gnome.org/viewvc/perl-Glib?rev=1060&view=rev

Log:
Use UTF-8 instead of ISO-8859-1 to encode umlauts.


Modified:
   trunk/ChangeLog
   trunk/t/e.t

Modified: trunk/t/e.t
==============================================================================
--- trunk/t/e.t	(original)
+++ trunk/t/e.t	Sun Jan 18 15:10:47 2009
@@ -3,6 +3,7 @@
 # ParamSpec stuff.
 #
 use strict;
+use utf8;
 use Glib ':constants';
 use Test::More tests => 240;
 
@@ -160,9 +161,9 @@
 
 $pspec = Glib::ParamSpec->unichar ('unichar', 'Unichar',
 	                           'is that like unixsex?',
-	                           'öqw/readable/);
+	                           'Ã', qw/readable/);
 pspec_common_ok ($pspec, 'Unichar', qw/readable/, 'Glib::UInt');
-is ($pspec->get_default_value, 'ö'Unichar default');
+is ($pspec->get_default_value, 'Ã', 'Unichar default');
 push @params, $pspec;
 
 



[Date Prev][Date Next]   [Thread Prev][Thread Next]   [Thread Index] [Date Index] [Author Index]