Changeset 422 for trunk/cgi-bin/IPDB.pm

Timestamp:

07/06/10 15:50:22 (14 years ago)

Author:

Kris Deugau

Message:

/trunk

checkpoint, email notice management. See #21.
Completed: display list, edit reciplist

File:

• trunk/cgi-bin/IPDB.pm (modified) (2 diffs)

trunk/cgi-bin/IPDB.pm

@@ -827 +827 @@
   my ($action,$subj,$message) = @_;
 
+##fixme: need to redesign the breakdown/processing for $action for proper handling of all cases
+
 # split action into parts for fiddlement.  nb: there are almost certainly better ways to do this.
-  my @actionbits = ($action =~ /^(.)(.)(.)$/);
+  my @actionbits = split //, $action;
 
   # want to notify anyone who has specifically requested notify on *this* type ($action as passed),
@@ -859 +861 @@
     $mailer->mail("ipdb\@$domain");
     $mailer->to($recip);
-    $mailer->data("From: \"IP Database\" <ipdb\@$domain>\n",
+    $mailer->data("From: \"$org_name IP Database\" <ipdb\@$domain>\n",
         "To: $recip\n",
         "Date: ".strftime("%a, %d %b %Y %H:%M:%S %z",localtime)."\n",