Fix warning about deprecated regex syntax using perl 5.22 here.

More information can be found here: http://www.perlmonks.org/?node_id=1104519

REVIEW: 124476
wilder
Jeremy Whiting 11 years ago
parent 79a4147442
commit e2b5dc2b2f
  1. 4
      modules/ksb/Module.pm

@ -957,7 +957,7 @@ sub destDir
$basePath ||= $self->name(); # Default if not provided in XML
}
$destDir =~ s/(\${MODULE})|(\$MODULE\b)/$basePath/g;
$destDir =~ s/(\$\{MODULE})|(\$MODULE\b)/$basePath/g;
return $destDir;
}
@ -978,7 +978,7 @@ sub installationPath
}
my $moduleName = $self->name();
$path =~ s/(\${MODULE})|(\$MODULE\b)/$moduleName/g;
$path =~ s/(\$\{MODULE})|(\$MODULE\b)/$moduleName/g;
return $path;
}

Loading…
Cancel
Save