From 7a467bcb1bc7fd731dd640948a9033512cc41858 Mon Sep 17 00:00:00 2001
From: Jarrod Johnson <jbjohnso@us.ibm.com>
Date: Fri, 27 Jun 2014 11:50:06 -0400
Subject: [PATCH] Modify strategy in case where login succeeds but set priv
 does not

Previously it would go all the way back.  Instead, go back just one step.
---
 xCAT-server/lib/perl/xCAT/IPMI.pm | 4 +---
 1 file changed, 1 insertion(+), 3 deletions(-)

diff --git a/xCAT-server/lib/perl/xCAT/IPMI.pm b/xCAT-server/lib/perl/xCAT/IPMI.pm
index 7abd6d738..7d7541bef 100644
--- a/xCAT-server/lib/perl/xCAT/IPMI.pm
+++ b/xCAT-server/lib/perl/xCAT/IPMI.pm
@@ -322,9 +322,7 @@ sub admin_level_set {
     my $code = $rsp->{code};
     if (($code == 0x80 or $code == 0x81) and $self->{privlevel} == 4) {
             $self->{privlevel} = 3;
-            $self->{logged}=1;
-            $self->logout();
-            $self->relog();
+            $self->subcmd(netfn=>0x6,command=>0x3b,data=>[$self->{privlevel}],callback=>\&admin_level_set,callback_args=>$self);
             return;
     }