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

SF.net SVN: ledger-smb: [557] trunk/LedgerSMB/Log.pm



Revision: 557
          http://svn.sourceforge.net/ledger-smb/?rev=557&view=rev
Author:   jasonjayr
Date:     2006-11-12 22:03:48 -0800 (Sun, 12 Nov 2006)

Log Message:
-----------
changed arguments to Dumper to sort keys by default.  since $form typically contains a *TON* of keys, this will make it
significantly easier to locate values of interest.

Modified Paths:
--------------
    trunk/LedgerSMB/Log.pm

Modified: trunk/LedgerSMB/Log.pm
===================================================================
--- trunk/LedgerSMB/Log.pm	2006-11-13 05:59:13 UTC (rev 556)
+++ trunk/LedgerSMB/Log.pm	2006-11-13 06:03:48 UTC (rev 557)
@@ -76,6 +76,11 @@
 sub notice { shift->print('notice',@_) }
 sub info { shift->print('info',@_) }
 sub debug { shift->print('debug',@_) }
-sub dump { shift->print('dump',Dumper(@_)) }
+sub dump { 
+	my $self = shift;
+	my $d = Data::Dumper->new(..hidden..);
+	$d->Sortkeys(1);
+	$self->print('dump',$d->Dump());
+}
 
 1;


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