/[cvs]/nfo/perl/libs/Data/Mungle/Transform/Deep.pm
ViewVC logotype

Diff of /nfo/perl/libs/Data/Mungle/Transform/Deep.pm

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 1.15 by jonen, Thu Feb 27 14:39:48 2003 UTC revision 1.17 by joko, Thu Mar 27 15:17:07 2003 UTC
# Line 2  Line 2 
2  ##  $Id$  ##  $Id$
3  ## ---------------------------------------------------------------------------  ## ---------------------------------------------------------------------------
4  ##  $Log$  ##  $Log$
5    ##  Revision 1.17  2003/03/27 15:17:07  joko
6    ##  namespace fixes for Data::Mungle::*
7    ##
8    ##  Revision 1.16  2003/03/27 15:04:52  joko
9    ##  minor update: comment
10    ##
11  ##  Revision 1.15  2003/02/27 14:39:48  jonen  ##  Revision 1.15  2003/02/27 14:39:48  jonen
12  ##  + fixed bug at _hash2object()  ##  + fixed bug at _hash2object()
13  ##  ##
# Line 56  Line 62 
62  ## ---------------------------------------------------------------------------  ## ---------------------------------------------------------------------------
63    
64    
65  package Data::Transform::Deep;  package Data::Mungle::Transform::Deep;
66    
67  use strict;  use strict;
68  use warnings;  use warnings;
# Line 75  use Data::Dumper; Line 81  use Data::Dumper;
81  use Iterate;  use Iterate;
82    
83  use Pitonyak::DeepCopy;  use Pitonyak::DeepCopy;
84  use Data::Transform::Encode qw( latin_to_utf8 latin_to_utf8_scalar utf8_to_latin utf8_to_latin_scalar );  use Data::Mungle::Transform::Encode qw( latin_to_utf8 latin_to_utf8_scalar utf8_to_latin utf8_to_latin_scalar );
85  use Data::Code::Ref qw( ref_slot );  use Data::Mungle::Code::Ref qw( ref_slot );
86    
87  sub numhash2list {  sub numhash2list {
88    my $vref = shift;    my $vref = shift;
# Line 291  sub _var_traverse_mixin_update_old { Line 297  sub _var_traverse_mixin_update_old {
297  sub merge_to {  sub merge_to {
298    _hash2object(@_);    _hash2object(@_);
299    # TODO:    # TODO:
300    # re-implement using CPAN's "Iterate".    # re-implement using CPAN's "Iterate" and/or a modified Hash::Merge.
301  }  }
302    
303    
Legend:
Removed from v.1.15  
changed lines
  Added in v.1.17
MailToCvsAdmin">MailToCvsAdmin
 ViewVC Help
Powered by ViewVC 1.1.26 RSS 2.0 feed