getting rid of some spurious warnings
authormiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 12 Aug 2005 16:44:12 +0000 (16:44 +0000)
committermiker <miker@dcc99617-32d9-48b4-a31d-7c20da2025e4>
Fri, 12 Aug 2005 16:44:12 +0000 (16:44 +0000)
git-svn-id: svn://svn.open-ils.org/ILS/trunk@1646 dcc99617-32d9-48b4-a31d-7c20da2025e4

OpenSRF/src/perlmods/OpenSRF/Application.pm

index 5405815..f33f5c2 100644 (file)
@@ -128,14 +128,14 @@ sub handler {
 
                        $in_request++;
 
-                       $log->debug( "Executing coderef for {$method_name -> ".join(', ', @args)."}", INTERNAL );
+                       $log->debug( "Executing coderef for {$method_name}", INTERNAL );
 
                        my $resp;
                        try {
                                my $start = time();
                                $resp = $coderef->run( $appreq, @args); 
                                my $time = sprintf '%.3f', time() - $start;
-                               $log->debug( "Method duration for {$method_name -> ".join(', ', @args)."}:  ". $time, DEBUG );
+                               $log->debug( "Method duration for {$method_name}:  ". $time, INFO );
                                if( defined( $resp ) ) {
                                        $appreq->respond_complete( $resp );
                                } else {