[libauthen-radius-perl] 05/06: Refresh 02_use_dumper.patch patch

[Salvatore Bonaccorso]

This is an automated email from the git hooks/post-receive script.

carnil pushed a commit to branch master
in repository libauthen-radius-perl.

commit cd4720740c2c838e979c753e2f1abd6115e16b66
Author: Salvatore Bonaccorso <carnil at debian.org>
Date:   Fri Jan 10 22:51:14 2014 +0100

    Refresh 02_use_dumper.patch patch
---
 debian/patches/02_use_dumper.patch | 14 +++++++-------
 1 file changed, 7 insertions(+), 7 deletions(-)

diff --git a/debian/patches/02_use_dumper.patch b/debian/patches/02_use_dumper.patch
index 769ed0f..c58f412 100644
--- a/debian/patches/02_use_dumper.patch
+++ b/debian/patches/02_use_dumper.patch
@@ -11,24 +11,24 @@ Last-Update: 2010-12-23
  use Digest::MD5;
  use Data::Dumper;
 -use Data::HexDump;
+ use Time::HiRes qw(time);
  
  use vars qw($VERSION @ISA @EXPORT);
- 
-@@ -206,7 +205,7 @@
+@@ -209,7 +208,7 @@
  
  	if ($debug) {
  		print STDERR "Sending request:\n";
 -		print STDERR HexDump($data);
-+		print STDERR Data::Dumper::Dumper($data);
++		print STDERR Dumper($data);
  	}
  	my $res;
  	if (!defined($self->{'node_list_a'})) {
-@@ -277,7 +276,7 @@
+@@ -281,7 +280,7 @@
  
- 	if ($debug) { 
- 		print STDERR "Received response:\n"; 
+ 	if ($debug) {
+ 		print STDERR "Received response:\n";
 -		print STDERR HexDump($data);
-+		print STDERR Data::Dumper::Dumper($data);
++		print STDERR Dumper($data);
  	}
  
  	if (defined($self->{'sock_list'})) {

-- 
Alioth's /usr/local/bin/git-commit-notice on /srv/git.debian.org/git/pkg-perl/packages/libauthen-radius-perl.git