projects
/
freeside.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
|
inline
| side by side
finish up weekly billing
[freeside.git]
/
FS
/
bin
/
freeside-email
diff --git
a/FS/bin/freeside-email
b/FS/bin/freeside-email
index
c7ff411
..
400dc2a
100755
(executable)
--- a/
FS/bin/freeside-email
+++ b/
FS/bin/freeside-email
@@
-12,11
+12,9
@@
my $user = shift or die &usage;
adminsuidsetup $user;
my $conf = new FS::Conf;
adminsuidsetup $user;
my $conf = new FS::Conf;
-my $domain = $conf->config('domain');
my @svc_acct = qsearch('svc_acct', {});
my @svc_acct = qsearch('svc_acct', {});
-my @usernames = map $_->username, @svc_acct;
-my @emails = map "$_\@$domain", @usernames;
+my @emails = map $_->email, @svc_acct;
print join("\n", @emails), "\n";
print join("\n", @emails), "\n";
@@
-51,7
+49,7
@@
user: From the mapsecrets file - see config.html from the base documentation
=head1 VERSION
=head1 VERSION
-$Id: freeside-email,v 1.
1 2001-05-15 07:52:3
4 ivan Exp $
+$Id: freeside-email,v 1.
2 2002-09-18 22:50:4
4 ivan Exp $
=head1 BUGS
=head1 BUGS