From 3231d29244c7e6ec08224a5d28f64cb3ebf67af8 Mon Sep 17 00:00:00 2001
From: daniceexi <daniceexi@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Wed, 24 Feb 2010 08:06:42 +0000
Subject: [PATCH] defect 2948337: use getInstallDir to get install dir

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@5272 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 xCAT-server/lib/xcat/plugins/packimage.pm | 7 +------
 1 file changed, 1 insertion(+), 6 deletions(-)

diff --git a/xCAT-server/lib/xcat/plugins/packimage.pm b/xCAT-server/lib/xcat/plugins/packimage.pm
index 7a4a18d9d..6c5da2a6c 100644
--- a/xCAT-server/lib/xcat/plugins/packimage.pm
+++ b/xCAT-server/lib/xcat/plugins/packimage.pm
@@ -22,16 +22,11 @@ sub handled_commands {
 }
 
 sub process_request {
-   my $sitetab = xCAT::Table->new('site');
    my $request = shift;
    my $callback = shift;
    my $doreq = shift;
-   my $ent = $sitetab->getAttribs({key=>'installdir'},['value']);
-   my $installroot = "/install";
+   my $installroot = xCAT::Utils->getInstallDir();
 
-   if ($ent and $ent->{value}) {
-      $installroot = $ent->{value};
-   }
    @ARGV = @{$request->{arg}};
    my $argc = scalar @ARGV;
    if ($argc == 0) {