X-Git-Url: https://pintos-os.org/cgi-bin/gitweb.cgi?a=blobdiff_plain;ds=sidebyside;f=perl-module%2Flib%2FPSPP.pm.in;h=158496677bfd800b31fe7c8d84299eeff7270f2d;hb=12c7324445fc5fd00d0536172373ddd8b253d0e2;hp=7d077992bd4ad2eef11caee90e663353021e4223;hpb=32ee0e0402d6d56674f53a47d879ec5c07dabe09;p=pspp

diff --git a/perl-module/lib/PSPP.pm.in b/perl-module/lib/PSPP.pm.in
index 7d077992bd..158496677b 100644
--- a/perl-module/lib/PSPP.pm.in
+++ b/perl-module/lib/PSPP.pm.in
@@ -179,12 +179,14 @@ use constant {
     MOYR =>     26, 
     WKYR =>     27, 
     DATETIME => 28, 
-    TIME =>     29, 
-    DTIME =>    30, 
-    WKDAY =>    31, 
-    MONTH =>    32, 
-    A =>        33, 
-    AHEX =>     34
+    YMDHMS =>   29, 
+    MTIME =>    30, 
+    TIME =>     31, 
+    DTIME =>    32, 
+    WKDAY =>    33, 
+    MONTH =>    34, 
+    A =>        35, 
+    AHEX =>     36
 };
 
 
@@ -402,7 +404,8 @@ package PSPP::Sysfile;
 =head3 new ($filename, $dict [,%opts])
 
 Creates a new system file from the dictionary C<dict>.  The file will
-be written to the file called C<filename>.
+be written to the file called C<filename>. The string C<filename> must 
+be encoded in UTF-8.
 C<opt>, if specified, is a hash containing optional parameters for the
 system file.  Currently, the only supported parameter is
 C<compress>. If C<compress> is non zero, then the system file written
@@ -481,7 +484,8 @@ Opens a system file for reading.
 
 Open is used to read data from an existing system file. 
 It creates and returns a PSPP::Reader object which can be used to read 
-data and dictionary information from C<filename>.
+data and dictionary information from C<filename>.  The string C<filename> 
+must be in UTF-8 encoding.
 
 =head3 get_case_cnt ()