[vhffs-dev] [svn] commit: r252 - /trunk/vhffs-irc/modobot.pl |
[ Thread Index |
Date Index
| More vhffs.org/vhffs-dev Archives
]
Author: florent
Date: Sun Oct 29 11:37:55 2006
New Revision: 252
Log:
Show the domain of mailing lists to moderate.
Modified:
trunk/vhffs-irc/modobot.pl
Modified: trunk/vhffs-irc/modobot.pl
==============================================================================
--- trunk/vhffs-irc/modobot.pl (original)
+++ trunk/vhffs-irc/modobot.pl Sun Oct 29 11:37:55 2006
@@ -199,11 +199,11 @@
map { last ML if (($_->get_oid eq $temp->get_oid) && ($_->get_localpart eq $temp->get_localpart)); } @oldmailing;
if( $vhffs->get_config->use_notation == 1 )
{
- irc_msg ("Mailing list : " . $temp->get_oid . " " . $temp->get_user->get_username . "(" . Vhffs::Note::get_note( $vhffs , $temp->get_user ) . ") " . $temp->get_group->get_groupname . " " . $temp->get_localpart . " " . Vhffs::Functions::stripslashes($temp->get_description));
- }
- else
- {
- irc_msg ("Mailing list : " . $temp->get_oid . " " . $temp->get_user->get_username . " " . $temp->get_group->get_groupname . " " . $temp->get_localpart . " " . Vhffs::Functions::stripslashes($temp->get_description));
+ irc_msg ("Mailing list : " . $temp->get_oid . " " . $temp->get_user->get_username . "(" . Vhffs::Note::get_note( $vhffs , $temp->get_user ) . ") " . $temp->get_group->get_groupname . " " . $temp->get_localpart . "@" . $temp->get_domain . " " . Vhffs::Functions::stripslashes($temp->get_description));
+ }
+ else
+ {
+ irc_msg ("Mailing list : " . $temp->get_oid . " " . $temp->get_user->get_username . " " . $temp->get_group->get_groupname . " " . $temp->get_localpart . "@" . $temp->get_domain . " " . Vhffs::Functions::stripslashes($temp->get_description));
}
}
@oldmailing = @{$mls};