From 9ba7b2938e7e14c280e7b9707969b8059deec6ae Mon Sep 17 00:00:00 2001 From: immarvin Date: Wed, 6 Sep 2017 02:21:40 -0400 Subject: [PATCH] fix issue [fvt] xcatd in SN did not load the latest version file after xcat upgrade in SN #3855 --- perl-xCAT/xCAT/Utils.pm | 9 ++++++++- 1 file changed, 8 insertions(+), 1 deletion(-) diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm index 83ff67d5f..e44a184ee 100644 --- a/perl-xCAT/xCAT/Utils.pm +++ b/perl-xCAT/xCAT/Utils.pm @@ -19,6 +19,7 @@ use lib "$::XCATROOT/lib/perl"; # needing it to avoid reprocessing of user tables ( ExtTab.pm) for each command call use POSIX qw(ceil); use File::Path; +#use Data::Dumper; use Socket; use strict; use Symbol; @@ -42,7 +43,6 @@ require xCAT::InstUtils; #require xCAT::NetworkUtils; require xCAT::Schema; -#require Data::Dumper; require xCAT::NodeRange; require xCAT::Version; require DBI; @@ -575,6 +575,13 @@ sub isLinux sub Version { my $version = shift; + + #force reload the xCAT::Version in case the perl-xcat is upgraded but xcatd is not restarted + if($INC{'xCAT/Version.pm'}){ + delete $INC{'xCAT/Version.pm'}; + } + + require xCAT::Version; $version = xCAT::Version->Version(); return $version; }