Changeset 681 for trunk

Timestamp:

01/20/15 11:26:58 (10 years ago)

Author:

Kris Deugau

Message:

/trunk

Convert SMTP From: address to a configuration entry

Location:

trunk/cgi-bin

Files:

• IPDB.pm (modified) (2 diffs)
• MyIPDB.pm (modified) (1 diff)

trunk/cgi-bin/IPDB.pm

@@ -81 +81 @@
 our $domain = 'example.com';
 our $defcustid = '5554242';
+our $smtpsender = 'ipdb@example.com';
 # mostly for rwhois
 ##fixme:  leave these blank by default?
@@ -1848 +1849 @@
 
   foreach my $recip (keys %reciplist) {
-    $mailer->mail("ipdb\@$domain");
+    $mailer->mail($smtpsender);
     $mailer->to($recip);
-    $mailer->data("From: \"$org_name IP Database\" <ipdb\@$domain>\n",
+    $mailer->data("From: \"$org_name IP Database\" <$smtpsender>\n",
         "To: $recip\n",
         "Date: ".strftime("%a, %d %b %Y %H:%M:%S %z",localtime)."\n",

trunk/cgi-bin/MyIPDB.pm

@@ -51 +51 @@
 #$IPDB::domain = 'bob.com';
 #$IPDB::defcustid = '5554242';
+#$IPDB::smtpsender = "ipdb\@$domain";
 # Globals for db2rwhois.pl
 #$IPDB::rwhoisDataPath = '/usr/local/rwhoisd/etc/rwhoisd';