Commit 11fc076c authored by js9's avatar js9

updating developer email check to new list address

git-svn-id: http://visit.ilight.com/svn/visit/trunk/src@16155 18c085ea-50e0-402c-830e-de6fd14e8384
parent 10d3924c
......@@ -119,9 +119,9 @@ if ($verbose)
if ($passwd ne "")
{
# authenticate as admin and save the cookie
@auth = `wget -q -O- --keep-session-cookies --save-cookies=tmpcookies "https://email.ornl.gov/mailman/admin/visit-developers/members?adminpw=$passwd"`;
@auth = `wget -q -O- --keep-session-cookies --save-cookies=tmpcookies "https://elist.ornl.gov/mailman/admin/visit-developers/members?adminpw=$passwd"`;
# get the list using the authentication session cookie
@html = `wget -q -O- --load-cookies=tmpcookies "https://email.ornl.gov/mailman/roster/visit-developers"`;
@html = `wget -q -O- --load-cookies=tmpcookies "https://elist.ornl.gov/mailman/roster/visit-developers"`;
# get just the members
@members = grep(m|href="../options/visit-developers/|, @html);
if ((scalar @members) < 1)
......@@ -199,7 +199,7 @@ if ($msg ne "")
print MAIL "From: $mailto\n";
print MAIL "Subject: Detected commiter/email problem\n";
print MAIL "\n";
print MAIL "From correlating with the commits made on $date, several problems\n";
print MAIL "From correlating with the commits made on $date, problems\n";
print MAIL "were discovered regarding developers and email subscriptions:\n";
print MAIL $msg;
close(MAIL);
......
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