arif/xcat-core
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

change for new syntax in CNM support to get_filelist

Browse Source 
git-svn-id: https://svn.code.sf.net/p/xcat/code/xcat-core/trunk@7198 8638fb3e-16cb-4fca-ae20-7b5d299a9bcd
This commit is contained in:
lissav 2010-08-24 12:24:45 +00:00
parent 3b1be19697
commit dc27bd58d5
1 changed files with 5 additions and 5 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
perl-xCAT/xCAT/Table.pm
View File

@ -3462,9 +3462,9 @@ sub getAutoIncrementColumns {
directory,filelist,type
Returns:
The list of sql files to be processed which consists of all the
files with <name>.sql and <name>.<databasename>.sql
files with <name>.sql and <name>_<databasename>.sql
or
files with <name>.pm and <name>.<databasename>.pm
files with <name>.pm and <name>_<databasename>.pm
Globals:
Error:
@ -3510,13 +3510,13 @@ sub get_filelist
my @filelist = ();
# my @dblist = glob($directory . "*.$dbname.$ext"); # current database
my @list = glob($directory . "*.$ext"); # all files
foreach my $file (@list)
{
my $filename= basename($file); # strip filename
my($name,$ext1,$ext2) = split '\.', $filename;
if ($ext1 eq $dbname)
my($name,$ext1) = split '\.', $filename;
my($name,$ext2) = split '\_', $name;
if ($ext2 eq $dbname)
{
push @filelist, $file;
}