summaryrefslogtreecommitdiffstats
path: root/scripts/tdesvn-build
diff options
context:
space:
mode:
authorSlávek Banko <slavek.banko@axis.cz>2013-02-17 12:01:55 +0100
committerSlávek Banko <slavek.banko@axis.cz>2013-02-17 12:01:55 +0100
commitac1f639daf758675f0a324b197da71850f56aed2 (patch)
tree07b5f1f6288e07dddc671244626e178b0b8398d4 /scripts/tdesvn-build
parent349f380f3d1e8e079404ec657ed10f733b1b2061 (diff)
downloadtdesdk-ac1f639daf758675f0a324b197da71850f56aed2.tar.gz
tdesdk-ac1f639daf758675f0a324b197da71850f56aed2.zip
Fix unintended rename of LOCKFILE
Diffstat (limited to 'scripts/tdesvn-build')
-rwxr-xr-xscripts/tdesvn-build14
1 files changed, 7 insertions, 7 deletions
diff --git a/scripts/tdesvn-build b/scripts/tdesvn-build
index ac998f28..657b0390 100755
--- a/scripts/tdesvn-build
+++ b/scripts/tdesvn-build
@@ -2231,7 +2231,7 @@ DONE
sub get_lock
{
my $lockfile = "$ENV{HOME}/.tdesvn-lock";
- sysopen LOCTDEFILE, $lockfile, O_WRONLY | O_CREAT | O_EXCL;
+ sysopen LOCKFILE, $lockfile, O_WRONLY | O_CREAT | O_EXCL;
my $errorCode = $!; # Save for later testing.
# Install signal handlers to ensure that the lockfile gets closed.
@@ -2298,16 +2298,16 @@ sub get_lock
# twice.
warning " y[WARNING]: stale tdesvn-build lockfile found, deleting.";
unlink $lockfile;
- sysopen LOCTDEFILE, $lockfile, O_WRONLY | O_CREAT | O_EXCL and do
+ sysopen LOCKFILE, $lockfile, O_WRONLY | O_CREAT | O_EXCL and do
{
- print LOCTDEFILE "$$\n";
- close LOCTDEFILE;
+ print LOCKFILE "$$\n";
+ close LOCKFILE;
};
return 1; # Hope the sysopen worked.
}
- print LOCTDEFILE "$$\n";
- close LOCTDEFILE;
+ print LOCKFILE "$$\n";
+ close LOCKFILE;
# Even if we fail it's generally better to allow the script to proceed
# without being a jerk about things, especially as more non-CLI-skilled
@@ -2320,7 +2320,7 @@ sub close_lock
{
my $lockfile = "$ENV{HOME}/.tdesvn-lock";
- close LOCTDEFILE;
+ close LOCKFILE;
unlink $lockfile;
}