[Gmod-schema-cmts] schema/XMLTools/XORT/Loader XMLParser.pm,1.1,1.2

[<pi...@us...>]

Update of /cvsroot/gmod/schema/XMLTools/XORT/Loader
In directory sc8-pr-cvs1:/tmp/cvs-serv21656/XORT/Loader

Modified Files:
	XMLParser.pm 
Log Message:


Index: XMLParser.pm
===================================================================
RCS file: /cvsroot/gmod/schema/XMLTools/XORT/Loader/XMLParser.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -C2 -d -r1.1 -r1.2
*** XMLParser.pm	15 May 2003 16:51:38 -0000	1.1
--- XMLParser.pm	28 May 2003 17:28:42 -0000	1.2
***************
*** 6,10 ****
  use lib $ENV{CodeBase};
  use XML::Parser::PerlSAX;
! use XORT:Util::DbUtil::DB;
  use strict;
  
--- 6,10 ----
  use lib $ENV{CodeBase};
  use XML::Parser::PerlSAX;
! use XORT::Util::DbUtil::DB;
  use strict;
  
***************
*** 314,320 ****
                 }
  	  }
!           else {
!               $hash_data_ref=&_extract_hash($AoH_data[$level], $hash_level_name{$level-1});
!           }
            # for empty hash_ref, will do nothing(other way to test undefined hash ? )
            my @temp;
--- 314,318 ----
                 }
  	  }
! 
            # for empty hash_ref, will do nothing(other way to test undefined hash ? )
            my @temp;
***************
*** 325,328 ****
--- 323,327 ----
  	  }
  	 if ($#temp >-1 ){
+           #print "\nthere is data for main module table:$hash_level_name{$level-1}";
            my  $hash_ref=&_data_check($hash_data_ref,  $hash_level_name{$level-1}, $level, \%hash_level_id, \%hash_level_name );