[vhffs-dev] [svn] commit: r127 - /trunk/vhffs-panel/panel.pl

[vhffs-dev@xxxxxxxxx]

Author: soda
Date: Mon Jan  2 22:01:32 2006
New Revision: 127

Log:
Fix bug in panel.pl


Modified:
    trunk/vhffs-panel/panel.pl

Modified: trunk/vhffs-panel/panel.pl
==============================================================================
--- trunk/vhffs-panel/panel.pl (original)
+++ trunk/vhffs-panel/panel.pl Mon Jan  2 22:01:32 2006
@@ -25,6 +25,10 @@
 my $cgi = $panel->{'cgi'};
 my $su_user = $cgi->param('su_user');
 my $message;
+
+my $template;
+my $projectname = $session->param("project");
+my $templatedir = $vhffs->get_config->get_templatedir;
 
 #We try to know if an admin want to su
 if( defined $su_user )
@@ -55,9 +59,6 @@
 	}
 }
 
-my $template;
-my $projectname = $session->param("project");
-my $templatedir = $vhffs->get_config->get_templatedir;
 
 
 if( defined $su_user )
@@ -65,7 +66,11 @@
 	$template = new HTML::Template( filename => $templatedir."/misc/simplemsg.tmpl" );
 	$template->param( MESSAGE => $message );
 }
-elsif( ( defined $projectname ) && ( $projectname == "none" )  )  {
+elsif( ( defined $projectname ) && ( $projectname eq "none" )  )  {
+	$template = right_first Vhffs::Panel::Main($vhffs , $session , $user);
+}
+elsif( ! ( defined $projectname ) )
+{
 	$template = right_first Vhffs::Panel::Main($vhffs , $session , $user);
 }
 else