PageRenderTime 28ms CodeModel.GetById 26ms app.highlight 0ms RepoModel.GetById 1ms app.codeStats 0ms

/wiki/get_last.wiki

http://perlwikipedia.googlecode.com/
Unknown | 9 lines | 7 code | 2 blank | 0 comment | 0 complexity | e45dd7ed520f21013242caab4a927a2e MD5 | raw file
Possible License(s): GPL-3.0
1==get_last($page, $user)==
2
3Returns the revid of the last revision to $page not made by $user. undef is returned if no result was found, as would be the case if the page is deleted.
4
5{{{
6my $revid = $bot->get_last("User:Mike.lifeguard/sandbox", "Mike.lifeguard");
7print "Reverting to $revid\n" if defined($revid);
8$bot->revert('User:Mike.lifeguard', $revid, 'rvv');
9}}}