Expand interactive SIP tests.
[koha.git] / C4 / SIP / interactive_members_dump.pl
index 8df6ea4..e477486 100755 (executable)
@@ -15,7 +15,7 @@ while (1) {
        last unless $in;
        print "GetMember : \n",  Dumper(GetMember($in, 'cardnumber'));
        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";