From d93db1f6f59afeab90a58ea70b91f9bd2b294e88 Mon Sep 17 00:00:00 2001 From: sakolish Date: Fri, 11 Jan 2008 19:32:52 +0000 Subject: [PATCH] Swapped order or -h and -v flag check git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@246 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- perl-xCAT-2.0/xCAT/PPCfsp.pm | 12 ++++++------ 1 file changed, 6 insertions(+), 6 deletions(-) diff --git a/perl-xCAT-2.0/xCAT/PPCfsp.pm b/perl-xCAT-2.0/xCAT/PPCfsp.pm index b1c0a6773..70199db99 100644 --- a/perl-xCAT-2.0/xCAT/PPCfsp.pm +++ b/perl-xCAT-2.0/xCAT/PPCfsp.pm @@ -72,18 +72,18 @@ sub parse_args { return( usage() ); } #################################### - # Option -v for version - #################################### - if ( exists( $opt{v} )) { - return( \@VERSION ); - } - #################################### # Option -h for Help #################################### if ( exists( $opt{h} )) { return( usage() ); } #################################### + # Option -v for version + #################################### + if ( exists( $opt{v} )) { + return( \@VERSION ); + } + #################################### # Check for "-" with no option #################################### if ( grep(/^-$/, @ARGV )) {