summaryrefslogtreecommitdiff
path: root/prj_install.pl
diff options
context:
space:
mode:
Diffstat (limited to 'prj_install.pl')
-rwxr-xr-xprj_install.pl14
1 files changed, 5 insertions, 9 deletions
diff --git a/prj_install.pl b/prj_install.pl
index ae8c00cf..9a7a0fc8 100755
--- a/prj_install.pl
+++ b/prj_install.pl
@@ -93,9 +93,7 @@ sub copyFiles {
}
else {
$status = copy($file, $dest);
- if ($status && -x $file) {
- chmod(0755, $dest);
- }
+ chmod(0755, $dest) if ($status && -x $file);
}
if (!$status) {
print STDERR "ERROR: Unable to $type $file to $dest\n";
@@ -105,9 +103,7 @@ sub copyFiles {
}
}
else {
- if ($verbose) {
- print "Skipping $file\n";
- }
+ print "Skipping $file\n" if ($verbose);
}
}
return 1;
@@ -263,9 +259,9 @@ sub getInsFiles {
sub usageAndExit {
my $msg = shift;
- if (defined $msg) {
- print STDERR "$msg\n";
- }
+
+ print STDERR "$msg\n" if (defined $msg);
+
my $base = basename($0);
my $spc = ' ' x (length($base) + 8);
print STDERR "$base v$version\n",