X-Git-Url: http://git.equinoxoli.org/?p=opensrf-equinox.git;a=blobdiff_plain;f=src%2Fperl%2Flib%2FOpenSRF%2FMultiSession.pm;h=995c9cb2ccd92f65b4ca8ca6e6b14e590702aaad;hp=4b9a99682b7e7221ac60b02bcff42e78de46baca;hb=32c6058def9336eaf4f36da2930a147240392e9d;hpb=703809d19a3336ee975d39efc3372363f6268365

diff --git a/src/perl/lib/OpenSRF/MultiSession.pm b/src/perl/lib/OpenSRF/MultiSession.pm
index 4b9a996..995c9cb 100644
--- a/src/perl/lib/OpenSRF/MultiSession.pm
+++ b/src/perl/lib/OpenSRF/MultiSession.pm
@@ -46,7 +46,7 @@ sub new {
 				1
 			);
 		#print "Creating connection ".$self->{sessions}->[-1]->session_id." ...\n";
-		$log->debug("Creating connection ".$self->{sessions}->[-1]->session_id." ...");
+		$log->debug(sub{return "Creating connection ".$self->{sessions}->[-1]->session_id." ..." });
 	}
 
 	return $self;
@@ -200,7 +200,7 @@ sub request {
 			  params => [@params]
 			};
 
-		$log->debug("Making request [$method] ".$self->running."...");
+		$log->debug(sub{return "Making request [$method] ".$self->running."..." });
 
 		return $req;
 	} elsif (!$self->adaptive) {
@@ -274,7 +274,7 @@ sub _session_reap {
 			push @done, $req;
 
 		} else {
-			#$log->debug("Still running ".$req->{meth}." in session ".$req->{req}->session->session_id);
+			#$log->debug(sub{return "Still running ".$req->{meth}." in session ".$req->{req}->session->session_id });
 			push @running, $req;
 		}
 	}