fixed a problem where put() was putting keys and values in random

places, using a normal hash fixed the probem and now --db works
perfectly again.  Seems to be a bug introduced with the newer berkely
and DB_File since it wasn't a problem before.  Solved.

SWIM/DB.pm

@@ -876,8 +876,15 @@ sub db {
 	  } # if defined        
 	  else {
 	      dbi(\%commands);
-	      print "$_ $db{$package_name}\n";
+
-	      $zing->put($_,$db{$package_name});    
+	      #$zing->put($_,$db{$package_name});    
+	      # wow, very weird .. used to work fine, but this did the trick :)
+	      # otherwise the key and value were placed in random places 
+	      # and never together
+	      # inspired here - http://modperlbook.org/html/ch19_06.html
+	      # in 19.6.2. Read/Write Access
+
+	      $ib{$_} = $db{$package_name};
 	  }
 
 	  untie %db;