|
From: | Vincent Caron <address@hidden> |
Subject: | [cvsreport] fixed command line hash bug (included in 0.3.3) |
Date: | Mon, 22 Sep 2003 19:18:34 -0400 |
Commit from zerodeux | 2003-09-22 19:18 EDT |
fixed command line hash bug (included in 0.3.3)
Module | File name | Revision | |||
---|---|---|---|---|---|
cvsreport | ChangeLog | 1.38 | >>> | 1.39 | |
cvsreport | cvsreport | 1.37 | >>> | 1.38 |
cvsreport/ChangeLog 1.38 >>> 1.39 |
---|
Line 1 |
- 2003/09/23 00:47 zerodeux |
+ 2003/09/23 01:19 zerodeux |
- releasing 0.3.3 |
+ + 2003/09/23 01:18 zerodeux + - fixed command line hash discrimant bug |
2003/09/22 17:01 zerodeux - get_short_message |
cvsreport/cvsreport 1.37 >>> 1.38 |
---|
Line 292 |
my $cvs_pid = getpgrp(0); # We need a lock wich is specific to our driver ($cvs_pid will do), and can discriminate |
- # simultaneous calls from the same filter invocation (a hash on args will do). |
+ # simultaneous calls from the same filter invocation (a hash on parsed args will do). |
my $hash = md5_hex $ARGS; my $cvs_lock = "$tmp_path/cvsreport.lock.$cvs_pid.$hash"; |
Line 308 |
debug " lock already held by previous instance, exiting\n"; myexit 0; } |
- cleanup_add $cvs_lock; |
debug " acquired lock" ; # Fork ourselves as a background child process, CVS will believe that this |
Line 320 |
error("could not fork background commit polling process.", 3) unless defined $child; } |
+ # From here we are the longer lasting process, we'll do the cleanup. + cleanup_add $cvs_lock; + |
# If we don't close these streams, parent 'cvs server' will select() on them indefinitely. # We could also reopen them but we won't use them, we don't have any tty to attach to. close STDOUT; |
Line 1828 |
my $help = 0; my $version = 0; |
- $ARGS = join ' ', @ARGV; # Save args as a string for possible later use. |
fix_cvs_args(); GetOptions('all|a' => \$all_users, |
Line 1856 |
debug " do_debug : $do_debug"; debug " execute : ". join(', ', @execute); debug " args : @ARGV (". (scalar @ARGV) .")"; |
+ + # Save parsed args as a string for later hashing. + $ARGS = "a:$all_users c:@configfiles d:$cvsroot D:$do_debug e:@execute f:$cset_from l:$localconfig n:$cset_max"; |
} |
[Prev in Thread] | Current Thread | [Next in Thread] |