--- nfo/perl/libs/Data/Mungle/Transform/Map.pm	2003/02/14 12:54:30	1.2
+++ nfo/perl/libs/Data/Mungle/Transform/Map.pm	2003/03/27 15:17:07	1.4
@@ -1,7 +1,13 @@
 ## --------------------------------------------------------------------------------
-##  $Id: Map.pm,v 1.2 2003/02/14 12:54:30 joko Exp $
+##  $Id: Map.pm,v 1.4 2003/03/27 15:17:07 joko Exp $
 ## --------------------------------------------------------------------------------
 ##  $Log: Map.pm,v $
+##  Revision 1.4  2003/03/27 15:17:07  joko
+##  namespace fixes for Data::Mungle::*
+##
+##  Revision 1.3  2003/02/21 01:49:24  joko
+##  renamed core function
+##
 ##  Revision 1.2  2003/02/14 12:54:30  joko
 ##  + established first code here
 ##
@@ -11,7 +17,7 @@
 ## --------------------------------------------------------------------------------
 
 
-package Data::Transform::Map;
+package Data::Mungle::Transform::Map;
 
 use strict;
 use warnings;
@@ -21,9 +27,9 @@
 
 use Data::Dumper;
 use XML::Simple;
-use Data::Transform::Encode qw( var2utf8 var_utf2iso );
-use Data::Compare::Struct qw( getRelations getDifference );
-use Data::Transform::Deep qw( deep_copy );
+use Data::Mungle::Transform::Encode qw( utf8_to_latin );
+use Data::Mungle::Compare::Struct qw( getRelations getDifference );
+use Data::Mungle::Transform::Deep qw( deep_copy );
 
 
 sub _init {
@@ -40,7 +46,7 @@
 sub _readSelectDb {
   my $self = shift;
   my $data = XMLin($self->{filename});
-  var_utf2iso($data);
+  utf8_to_latin($data);
   $self->{db} = $data;
 }