Can some perl coder take a quick look at this and tell me if
I've understood and solved the problem correctly?
The value of $2 seems to be destroyed or in some way become
undefined in the blocks that tests for other matches.
Sun Feb 26 19:24:19 CET 2006 Tommy Pettersson <[EMAIL PROTECTED]>
* fix bug in release state version extraction
Save result of old regexp match before matching new regexps.
New patches:
[fix bug in release state version extraction
Tommy Pettersson <[EMAIL PROTECTED]>**20060226182419
Save result of old regexp match before matching new regexps.
] {
hunk ./determine_release_state.pl 12
+ my $n = $2;
hunk ./determine_release_state.pl 14
- $state = "prerelease $2";
+ $state = "prerelease $n";
hunk ./determine_release_state.pl 16
- $state = "release candidate $2";
+ $state = "release candidate $n";
hunk ./determine_release_state.pl 20
- $state = "tag $1$2";
+ $state = "tag $1$n";
}
Context:
[TAG 1.0.6rc1
Tommy Pettersson <[EMAIL PROTECTED]>**20060219231919]
Patch bundle hash:
50784ba7a55bcc3aaa035eeb8891773a44b8bca5
_______________________________________________
darcs-devel mailing list
[email protected]
http://www.abridgegame.org/cgi-bin/mailman/listinfo/darcs-devel
