From 17d1ff7aca81f8002dfcfb8974873a2cc0a16a86 Mon Sep 17 00:00:00 2001
From: Pascal Rigaux <pixel@mandriva.com>
Date: Mon, 5 Jan 2004 10:19:45 +0000
Subject: perl_checker fix

---
 MDK/Common/File.pm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/MDK/Common/File.pm b/MDK/Common/File.pm
index 607b881..c596ad5 100644
--- a/MDK/Common/File.pm
+++ b/MDK/Common/File.pm
@@ -178,7 +178,7 @@ sub cp_with_option {
 	    -d $dest or mkdir $dest, (stat($src))[2] or die "mkdir: can't create directory $dest: $!\n";
 	    cp_af(glob_($src), $dest);
 	} elsif (-l $src && $keep_symlinks) {
-	    unless (symlink((readlink($src) || die "readlink failed: $!"), $dest)) {
+	    unless (symlink(readlink($src) || die("readlink failed: $!"), $dest)) {
 		warn "symlink: can't create symlink $dest: $!\n";
 	    }
 	} else {
-- 
cgit v1.2.1