--- nfo/perl/libs/Data/Mungle/Compare/Struct.pm	2004/07/07 03:13:43	1.7
+++ nfo/perl/libs/Data/Mungle/Compare/Struct.pm	2004/10/07 14:06:46	1.8
@@ -1,7 +1,10 @@
 ##    --------------------------------------------------------------------------------
-##    $Id: Struct.pm,v 1.7 2004/07/07 03:13:43 joko Exp $
+##    $Id: Struct.pm,v 1.8 2004/10/07 14:06:46 jonen Exp $
 ##    --------------------------------------------------------------------------------
 ##    $Log: Struct.pm,v $
+##    Revision 1.8  2004/10/07 14:06:46  jonen
+##    minor changes, comment-out debug dumper
+##
 ##    Revision 1.7  2004/07/07 03:13:43  joko
 ##    minor fix for "sub isEmpty"
 ##
@@ -96,7 +99,7 @@
 
   #print "isEmpty is parsing variable ( ref $ref reftype $reftype )", "\n";
   
-#print Dumper($var);
+#print Dumper($ref);
   
   my $found;
 
@@ -166,7 +169,7 @@
   }
   
   if (!$found) {
-    print "isEmpty could not parse variable ( ref $ref reftype $reftype )", "\n";
+    #print "isEmpty could not parse variable ( ref $ref reftype $reftype )", "\n";
   }
 
   #print "EMPTY!!!", "\n";