Commit ac328045 authored by Robert Ricci's avatar Robert Ricci

Include more debugging output

parent 06f6b9b4
......@@ -19,6 +19,7 @@ use Getopt::Long;
use JSON;
use Cwd 'abs_path';
use File::Basename;
use Data::Dumper;
use POSIX "setsid";
use strict;
......@@ -356,7 +357,8 @@ sub get_member_addresses($) {
foreach my $member (@$memberinfo) {
my $address = $member->{'email'};
if ($verbose) {
print "Member: $address\n";
print "Member details: . " . Dumper($member) . "\n";
print "Member address: $address\n";
}
push @addresses, $address;
}
......
Markdown is supported
0% or
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment