From cdfb972d0f7918b4b2c76489520331416edf1f6a Mon Sep 17 00:00:00 2001 From: sakolish Date: Wed, 4 Jun 2008 19:44:34 +0000 Subject: [PATCH] Call xCAT::Usage form getmacs instead of doing usage with PPCmac.pm module git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@1585 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT/xCAT/PPCmac.pm | 14 +++----------- 1 file changed, 3 insertions(+), 11 deletions(-) diff --git a/perl-xCAT/xCAT/PPCmac.pm b/perl-xCAT/xCAT/PPCmac.pm index 82713360e..686f0108a 100644 --- a/perl-xCAT/xCAT/PPCmac.pm +++ b/perl-xCAT/xCAT/PPCmac.pm @@ -22,17 +22,8 @@ sub parse_args { # Responds with usage statement ############################################# local *usage = sub { - return( [ $_[0], - "getmacs -h|--help", - "getmacs -v|--version", - "getmacs [-V|--verbose] noderange [-d][-S server -G gateway -C client]", - " -h writes usage information to standard output", - " -v displays command version", - " -C IP of the partition", - " -G Gateway IP of the partition specified", - " -S Server IP to ping", - " -V verbose output", - " -d display MAC only. The default is to write the first adapter MAC to the xCAT database."]); + my $usage_string = xCAT::Usage->getUsage($cmd); + return( [ $_[0], $usage_string] ); }; ############################################# # Process command-line arguments @@ -443,3 +434,4 @@ sub writemac { +