summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorPascal Terjan <pterjan@mandriva.org>2009-10-07 16:55:22 +0000
committerPascal Terjan <pterjan@mandriva.org>2009-10-07 16:55:22 +0000
commit84b97eba7dd428d5d4cab85852d313c6ee294935 (patch)
tree1d2e3af635289b1e903416146c2ea7cb34f79cbb
parent3019f58e316b2109e92fe7b7e2a06b3a2d1fc53c (diff)
downloadperl-MDK-Common-84b97eba7dd428d5d4cab85852d313c6ee294935.tar
perl-MDK-Common-84b97eba7dd428d5d4cab85852d313c6ee294935.tar.gz
perl-MDK-Common-84b97eba7dd428d5d4cab85852d313c6ee294935.tar.bz2
perl-MDK-Common-84b97eba7dd428d5d4cab85852d313c6ee294935.tar.xz
perl-MDK-Common-84b97eba7dd428d5d4cab85852d313c6ee294935.zip
Update comment
-rw-r--r--lib/MDK/Common/File.pm2
1 files changed, 1 insertions, 1 deletions
diff --git a/lib/MDK/Common/File.pm b/lib/MDK/Common/File.pm
index c06294c..cacad59 100644
--- a/lib/MDK/Common/File.pm
+++ b/lib/MDK/Common/File.pm
@@ -272,7 +272,7 @@ sub glob_ {
sub substInFile(&@) {
my ($f, $file) = @_;
- #- try hard to keep symlinks as they were set
+ #FIXME we should follow symlinks, and fail in case of loop
if (-l $file) {
my $targetfile = readlink $file;
$file = $targetfile;