From 01461cdc508f87349442dfcec5381e46f6255654 Mon Sep 17 00:00:00 2001 From: immarvin Date: Fri, 31 Aug 2012 06:22:57 +0000 Subject: [PATCH] add some comments git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@13678 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd --- xCAT-server/lib/perl/xCAT/SvrUtils.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/xCAT-server/lib/perl/xCAT/SvrUtils.pm b/xCAT-server/lib/perl/xCAT/SvrUtils.pm index 5500fbf14..278b2652c 100644 --- a/xCAT-server/lib/perl/xCAT/SvrUtils.pm +++ b/xCAT-server/lib/perl/xCAT/SvrUtils.pm @@ -1558,7 +1558,7 @@ sub update_osdistro_table if($arch){ $updates{arch} = $arch; } - +#split $osver to basename,majorversion,minorversion if($osver){ ($updates{basename},$updates{majorversion},$updates{minorversion}) = &parseosver($osver); } @@ -1577,6 +1577,7 @@ sub update_osdistro_table (my $ref) = $tab->getAttribs(\%keyhash, 'dirpaths'); if ($ref and $ref->{dirpaths} ) { +#if $path does not exits in "dirpaths" of osdistro,append the $path delimited with a ",";otherwise keep the original value unless($ref->{dirpaths} =~ /^($path)\/*,|,($path)\/*,|,($path)\/*$|^($path)\/*$/) { $updates{dirpaths}=$ref->{dirpaths}.','.$path;