[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

SF.net SVN: ledger-smb:[4167] branches/1.3/lsmb-request.pl



Revision: 4167
          http://ledger-smb.svn.sourceforge.net/ledger-smb/?rev=4167&view=rev
Author:   tshvr
Date:     2011-12-08 09:09:04 +0000 (Thu, 08 Dec 2011)
Log Message:
-----------
logging

Modified Paths:
--------------
    branches/1.3/lsmb-request.pl

Modified: branches/1.3/lsmb-request.pl
===================================================================
--- branches/1.3/lsmb-request.pl	2011-12-08 09:06:21 UTC (rev 4166)
+++ branches/1.3/lsmb-request.pl	2011-12-08 09:09:04 UTC (rev 4167)
@@ -43,11 +43,11 @@
 # for custom preprocessing logic
 eval { require "custom.pl"; };
 
-$logger->debug("getting request");
+$logger->debug("getting new LedgerSMB");
 
 my $request = new LedgerSMB;
 
-$logger->debug("Got request");
+$logger->debug("Got \$request=$request");
 $logger->trace("\$request=".Data::Dumper::Dumper($request));
 
 $request->{action} = '__default' if (!$request->{action});
@@ -74,7 +74,7 @@
 $logger->debug("calling $script");
 
 &call_script( $script, $request );
-$logger->debug("after calling script=$script action=$request->{action}");
+$logger->debug("after calling script=$script action=$request->{action} \$request->{dbh}=$request->{dbh}");
 
 # Prevent flooding the error logs with undestroyed connection warnings
 $request->{dbh}->disconnect()

This was sent by the SourceForge.net collaborative development platform, the world's largest Open Source development site.