X-Git-Url: http://git.rot13.org/?a=blobdiff_plain;f=C4%2FSIP%2Finteractive_members_dump.pl;h=2389769031330d3e423e3e0901b670cebf3cc13e;hb=90e2aafeb538f2d5e52fd1d32fce528f72076df8;hp=8df6ea4f403c3bc6e730e7f76447a0c612620be2;hpb=99efcf83f065b0c6fdd0436ea953dd11ff31ebad;p=koha.git

diff --git a/C4/SIP/interactive_members_dump.pl b/C4/SIP/interactive_members_dump.pl
index 8df6ea4f40..2389769031 100755
--- a/C4/SIP/interactive_members_dump.pl
+++ b/C4/SIP/interactive_members_dump.pl
@@ -13,9 +13,9 @@ while (1) {
 	defined($in) or last;
 	chomp($in);
 	last unless $in;
-	print "GetMember : \n",  Dumper(GetMember($in, 'cardnumber'));
+	print "GetMember : \n",  Dumper(GetMember('cardnumber'=>$in));
 	my ($member) = GetMemberDetails(undef, $in);
-	my $flags = $member->{flags};
+	my $flags = $member->{authflags};
 	print "GetMemberDetails (member) : \n", Dumper($member);
 	print "GetMemberDetails ( flags) : \n", Dumper($flags);
 	print "=" x 10, "\n";