There was an undocumented field named "rev", I think "id" is a better name,
and nothing uses it yet.
# Examine the RCS history and generate a list of recent changes.
# The data structure returned for each change is:
# {
+ # id => # the RCSs id for this commit
# user => # name of user who made the change,
# committype => # either "web" or the name of the rcs,
# when => # time when the change was made,
}
push @rets, {
- rev => $sha1,
+ id => $sha1,
user => $user,
committype => $type,
when => $when,
$user =~ s/^\s*//;
push @ret, {
- rev => $info->{"changeset"},
+ id => $info->{"changeset"},
user => $user,
committype => "mercurial",
when => time - str2time($info->{"date"}),
}
push @ret, {
- rev => $rev,
+ id => $rev,
user => $user,
committype => $committype,
when => $when,
diffurl => $diffurl,
} if length $file;
}
- push @ret, { rev => $rev,
+ push @ret, {
+ id => $rev,
user => $user,
committype => $committype,
when => $when,
diffurl => $diffurl,
} if length $file;
}
- push @ret, { rev => $change,
+ push @ret, {
+ id => $change,
user => $user,
committype => $committype,
when => $when,