From 42908ab23b73d1d6dd8fd753cb32ba0d2b8dc924 Mon Sep 17 00:00:00 2001
From: lissav <lissav@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Mon, 5 Jan 2009 15:00:54 +0000
Subject: [PATCH] fix for now parms on sinv SF defect 2486965

git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@2558 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
---
 perl-xCAT/xCAT/SINV.pm | 8 ++++++++
 1 file changed, 8 insertions(+)

diff --git a/perl-xCAT/xCAT/SINV.pm b/perl-xCAT/xCAT/SINV.pm
index 6427b7c71..c023d5515 100644
--- a/perl-xCAT/xCAT/SINV.pm
+++ b/perl-xCAT/xCAT/SINV.pm
@@ -82,6 +82,14 @@ sub parse_and_run_sinv
     my $rc  = 0;
     $::CALLBACK = $callback;
     my $args = $request->{arg};
+    if (!($args)) {
+        my $rsp = {};
+        $rsp->{data}->[0] =
+          "No arguments have been supplied to the sinv command. Check the sinv man page for appropriate input. \n";
+        xCAT::MsgUtils->message("E", $rsp, $callback);
+        exit 1;
+    }
+
     @ARGV = @{$args};    # get arguments
     my %options = ();
     $Getopt::Long::ignorecase = 0;    #Checks case in GetOptions