From eb16d571a05f372ce73a564d295dc1f2a8d82daf Mon Sep 17 00:00:00 2001 From: Sheng Feng Xing Date: Sun, 22 Sep 2013 14:34:40 +0800 Subject: [PATCH] Fix #3793: CFMUtils.pm can not sync-up symbolic link directory under cfmdir --- perl-xCAT/xCAT/CFMUtils.pm | 3 ++- 1 file changed, 2 insertions(+), 1 deletion(-) diff --git a/perl-xCAT/xCAT/CFMUtils.pm b/perl-xCAT/xCAT/CFMUtils.pm index 0bbd01f28..987cb0d65 100644 --- a/perl-xCAT/xCAT/CFMUtils.pm +++ b/perl-xCAT/xCAT/CFMUtils.pm @@ -363,7 +363,8 @@ sub updateCFMSynclistFile { # recursively list the files under cfm directory my @files = (); - find ( sub { push @files, $File::Find::name if (! -d) }, $cfmdir); + + find ( { wanted => sub { push @files, $File::Find::name if -f }, follow => 1 }, $cfmdir); if (!@files) # not files under cfm directory, skip to next loop { next;