[vhffs-dev] [924] Modify modobot.pl to show lsgroup on one line

[subversion@xxxxxxxxxxxxx]

Revision: 924
Author:   misric
Date:     2007-09-15 14:50:48 +0000 (Sat, 15 Sep 2007)

Log Message:
-----------
Modify modobot.pl to show lsgroup on one line

Modified Paths:
--------------
    trunk/vhffs-irc/modobot.pl


Modified: trunk/vhffs-irc/modobot.pl
===================================================================
--- trunk/vhffs-irc/modobot.pl	2007-09-14 02:16:42 UTC (rev 923)
+++ trunk/vhffs-irc/modobot.pl	2007-09-15 14:50:48 UTC (rev 924)
@@ -216,20 +216,26 @@
  {
   my $users = Vhffs::Group::get_users($group);
   my $temp;
+  my $list_usergroup_owner;
+  my $list_usergroup_members;
+
   foreach $temp ( @{$users} )
   {
    if ( $temp->get_username =~ $group->get_owner_username)
    {
-    irc_msg(" @ ".$temp->get_username);
-   }
+    $list_usergroup_owner .= "@".$temp->get_username." ";
+   }   
    else
    {
-    irc_msg(" + ".$temp->get_username);
+    $list_usergroup_members .= "+".$temp->get_username." ";
    }
   }
+  my $list_usergroup .= $list_usergroup_owner.$list_usergroup_members;
+  irc_msg($list_usergroup);
  }
 }
 
+
 sub quotacheck
 {
  my $limit = shift;