<html>
<body>
<div id="body" style="background-color:#ffffff;" >
<table cellspacing="0" cellpadding="0" border="0" rules="cols">
<tr class="head" style="border-bottom-width:1px;border-bottom-style:solid;" ><td class="headtd" style="padding:0;padding-top:.2em;" colspan="4">Commit in <b><tt>lxdream/src</tt></b></td></tr>
<tr><td><tt><a href="#file1">checkver.pl</a></tt></td><td id="added" class="headtd2" style="padding-left:.3em;padding-right:.3em; background-color:#ddffdd;" align="right">+9</td><td id="removed" class="headtd2" style="padding-left:.3em;padding-right:.3em; background-color:#ffdddd;" align="right">-9</td><td class="headtd2" style="padding-left:.3em;padding-right:.3em;" nowrap="nowrap">d3c00ffccfcd -> a422f30ce0a8</td></tr>
</table>
<pre class="comment" style="white-space:-moz-pre-wrap;white-space:-pre-wrap;white-space:-o-pre-wrap;white-space:pre-wrap;word-wrap:break-word;padding:4px;border:1px dashed #000000;background-color:#ffffdd;" >
Update checkver.pl to retrieve the mercurial revision and hash
</pre>
<hr /><a name="file1" /><div class="file" style="border:1px solid #eeeeee;margin-top:1em;margin-bottom:1em;" >
<span class="pathname" style="font-family:monospace; float:right;" >lxdream/src</span><br />
<div class="fileheader" style="margin-bottom:.5em;" ><big><b>checkver.pl</b></big> <small id="info" style="color: #888888;" >d3c00ffccfcd -> a422f30ce0a8</small></div>
<pre class="diff" style="margin:0;" ><small id="info" style="color: #888888;" >--- lxdream/src/checkver.pl
+++ lxdream/src/checkver.pl
@@ -1,21 +1,21 @@
</small></pre><pre id="context" class="diff" style="margin:0; background-color:#eeeeee;" > #!/usr/bin/perl
# Usage: updatever.pl <basever> <top_srcdir> <version file>
</pre><pre id="removed" class="diff" style="margin:0; background-color:#ffdddd;" >-my $svnversion = "svnversion";
</pre><pre id="added" class="diff" style="margin:0; background-color:#ddffdd;" >+my $hgversion = "hg identify -i -n";
</pre><pre id="context" class="diff" style="margin:0; background-color:#eeeeee;" > my $basever = $ARGV[0];
my $top_srcdir = $ARGV[1];
my $outfile = $ARGV[2];
</pre><pre id="removed" class="diff" style="margin:0; background-color:#ffdddd;" >-my $rev = "";
</pre><pre id="added" class="diff" style="margin:0; background-color:#ddffdd;" >+my $rev = ""<span id="addedchars" style="background-color:#99ff99;font-weight:bolder;" >, $hash</span>;
</pre><pre id="context" class="diff" style="margin:0; background-color:#eeeeee;" > my $full_ver = "$basever";
</pre><pre id="removed" class="diff" style="margin:0; background-color:#ffdddd;" >-if( $svnversion ) {
- $rev = `$svnversion "$top_srcdir"`;
- chomp $rev;
- if( $rev == "exported" ) {
- $rev = "";
- } else {
- $full_ver = "${basever}.${rev}";
</pre><pre id="added" class="diff" style="margin:0; background-color:#ddffdd;" >+if( $hgversion ) {
+ my $ident = `$hgversion "$top_srcdir" 2>/dev/null`;
+ if ( $? == 0 ) {
+ chomp $ident;
+ ($hash,$rev) = split /\s+/,$ident,2;
+ $rev =~ s/\+//g;
+ $full_ver = "${basever}.${rev}:${hash}";
</pre><pre id="context" class="diff" style="margin:0; background-color:#eeeeee;" > }
}
my $header = "/* Autogenerated by checkver.pl */";
</pre></div>
<center><small>Chaos Theory</small></center>
</div></body></html>