Merge pull request #7259 from gurevichmark/AAsn_syntax

Fix Perl error in AAsn.pm
xcat2 · Oct 4, 2022 · 5a67794 · 5a67794
2 parents 544835a + cbb39ea
commit 5a67794
Showing 1 changed file with 6 additions and 0 deletions.
diff --git a/xCAT-server/lib/xcat/plugins/AAsn.pm b/xCAT-server/lib/xcat/plugins/AAsn.pm
@@ -2,6 +2,12 @@
 # IBM(c) 2007 EPL license http://www.eclipse.org/legal/epl-v10.html
 #-------------------------------------------------------
 package xCAT_plugin::AAsn;
+
+BEGIN
+{
+    $::XCATROOT = $ENV{'XCATROOT'} ? $ENV{'XCATROOT'} : '/opt/xcat';
+}
+use lib "$::XCATROOT/lib/perl";
 use strict;
 use xCAT::Table;