X-Git-Url: http://git.indexdata.com/?p=simpleserver-moved-to-github.git;a=blobdiff_plain;f=SimpleServer.pm;h=003efeab45c725a48bab915c4b938e85f6c45f7f;hp=5a8e6dd79181c1ca195eeafc5f9712e13bab7e4a;hb=e553a8a0187c083bf7617a544fcefcd76205d272;hpb=78a1497c637ec3d2e47d6250026c9ab81ca23665

diff --git a/SimpleServer.pm b/SimpleServer.pm
index 5a8e6dd..003efea 100644
--- a/SimpleServer.pm
+++ b/SimpleServer.pm
@@ -25,7 +25,7 @@
 ##
 ##
 
-## $Id: SimpleServer.pm,v 1.39 2007-08-20 10:59:50 mike Exp $
+## $Id: SimpleServer.pm,v 1.40 2007-08-20 11:06:09 mike Exp $
 
 package Net::Z3950::SimpleServer;
 
@@ -146,7 +146,6 @@ sub toPQF {
 
     my $res = "";
     foreach my $attr (@{ $this->{attributes} }) {
-	use Data::Dumper; print "considering attr: ", Dumper($attr);
 	$res .= "\@attr ";
 	my $set = $attr->{attributeSet};
 	$res .= "$set " if defined $set;