chiark / gitweb /
belgrano
[ian-dotfiles.git] / files / personal_scripts_bin_xterm-CT
index 1f2c4116b39a443e2a620eedfc51d2f039f90a42..15e8d7cbcf6f2476bfe4c425b99faf28b7affbde 100755 (executable)
@@ -3,7 +3,7 @@ set -e
 titlebase="$1"
 shift
 touch "$HOME/.counters/l.$DISPLAY"
-newcount=`with-lock-wait "$HOME/.counters/l.$DISPLAY" perl -e '
+newcount=`with-lock-ex -w "$HOME/.counters/l.$DISPLAY" perl -e '
        chdir($ARGV[2]) or die $!;
        $tb= unpack("H*",$ARGV[1]); $found=0;
        open(X,"v.$ARGV[0]\0") or die $!;