From 0d7b477eded6c0b3dbd78c74925e532ccacf5cf3 Mon Sep 17 00:00:00 2001
From: jbjohnso <jbjohnso@8638fb3e-16cb-4fca-ae20-7b5d299a9bcd>
Date: Fri, 19 Sep 2008 17:39:06 +0000
Subject: [PATCH] -Change version to allow a short variant for some purposes

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

diff --git a/perl-xCAT/xCAT/Utils.pm b/perl-xCAT/xCAT/Utils.pm
index 6937cf8c4..05d155977 100644
--- a/perl-xCAT/xCAT/Utils.pm
+++ b/perl-xCAT/xCAT/Utils.pm
@@ -235,7 +235,7 @@ sub isLinux
 
 =head3   Version 
     Arguments:
-        none
+        Optional 'short' string to request only the version;
     Returns:
        xcat Version number 
     Globals:
@@ -252,7 +252,12 @@ sub isLinux
 sub Version
 {
 #The following tag tells the build script where to append build info
-    my $version = "Version 2.1"#XCATSVNBUILDSUBHERE
+    my $version=shift;
+    if ($version eq 'short') {
+        $version = "2.1";
+    } else {
+        $version = "Version 2.1"#XCATSVNBUILDSUBHERE
+    }
     ;
     return $version; 
 }