[vhffs-dev] [1113] Fixes edition by admins

[subversion@xxxxxxxxxxxxx]

Revision: 1113
Author:   gradator
Date:     2007-12-14 19:30:19 +0000 (Fri, 14 Dec 2007)

Log Message:
-----------
Fixes edition by admins

Modified Paths:
--------------
    trunk/vhffs-panel/mailinglist/prefs.pl


Modified: trunk/vhffs-panel/mailinglist/prefs.pl
===================================================================
--- trunk/vhffs-panel/mailinglist/prefs.pl	2007-12-13 22:55:04 UTC (rev 1112)
+++ trunk/vhffs-panel/mailinglist/prefs.pl	2007-12-14 19:30:19 UTC (rev 1113)
@@ -149,9 +149,11 @@
 	$template->param( TEXT_ADD_MEMBERS => gettext("Addresses (one per line)") );
 	$template->param( BUTTON_ADD_MEMBERS => gettext("Add them !") );
 
-	my $emaillist = "";
-	foreach ( @{$group->get_users} )  {
-		$emaillist .= $_->{'mail'}."\n";
+	my $emaillist = '';
+	if( defined $group )  {
+		foreach ( @{$group->get_users} )  {
+			$emaillist .= $_->{'mail'}."\n";
+		}
 	}
 	$template->param( PROJECT_MEMBERS_LIST => $emaillist );
 	$template->param( PUBLIC_ARCHIVE => $list->get_open_archive == 1 );