Changeset 16014

Timestamp:

2008-06-16T11:37:44+12:00 (16 years ago)

Author:

kjdon

Message:

changed some strings.properties key names.

Location:

gsdl/trunk/perllib/plugins

Files:

• BasePlugin.pm (modified) (2 diffs)
• ReadTextFile.pm (modified) (3 diffs)

gsdl/trunk/perllib/plugins/BasePlugin.pm

@@ -48 +48 @@
 our $encoding_list =
     [ { 'name' => "ascii",
-    'desc' => "{ReadTextFile.input_encoding.ascii}" },
+    'desc' => "{BasePlugin.encoding.ascii}" },
       { 'name' => "utf8",
-    'desc' => "{ReadTextFile.input_encoding.utf8}" },
+    'desc' => "{BasePlugin.encoding.utf8}" },
       { 'name' => "unicode",
-    'desc' => "{ReadTextFile.input_encoding.unicode}" } ];
+    'desc' => "{BasePlugin.encoding.unicode}" } ];
 
 my $e = $encodings::encodings;
@@ -66 +66 @@
 our $encoding_plus_auto_list = 
     [ { 'name' => "auto",
-    'desc' => "{ReadTextFile.input_encoding.auto}" } ];
+    'desc' => "{BasePlugin.filename_encoding.auto}" } ];
 
 push(@{$encoding_plus_auto_list},@{$encoding_list});

gsdl/trunk/perllib/plugins/ReadTextFile.pm

@@ -47 +47 @@
 }
 
+my $encoding_plus_auto_list = 
+    [ { 'name' => "auto",
+    'desc' => "{ReadTextFile.input_encoding.auto}" } ];
+push(@{$encoding_plus_auto_list},@{$BasePlugin::encoding_list});
 
 my $arguments =
@@ -52 +56 @@
     'desc' => "{ReadTextFile.input_encoding}",
     'type' => "enum",
-    'list' => $BasePlugin::encoding_plus_auto_list,
+    'list' => $encoding_plus_auto_list,
     'reqd' => "no" ,
     'deft' => "auto" } ,
@@ -79 +83 @@
 
 my $options = { 'name'     => "ReadTextFile",
-        'desc'     => "{ReadTxtFile.desc}",
+        'desc'     => "{ReadTextFile.desc}",
         'abstract' => "yes",
         'inherits' => "no",