diff options
author | Joey Hess <joey@kitenet.net> | 2010-06-23 16:05:49 -0400 |
---|---|---|
committer | Joey Hess <joey@kitenet.net> | 2010-06-23 16:05:49 -0400 |
commit | b4a43406f61b7ff9ab77d242edf4d59369ac8596 (patch) | |
tree | ca0d33b7d0e22a19f9fb1610df1f7238bcd2ec3d /IkiWiki/Plugin/tla.pm | |
parent | c46bcb425af0948ac59581d6ba7b477826d83ae3 (diff) |
API: rcs_commit and rcs_commit_staged are passed a new parameter
that may contain the username component of the email address of
the user making the commit.
Diffstat (limited to 'IkiWiki/Plugin/tla.pm')
-rw-r--r-- | IkiWiki/Plugin/tla.pm | 7 |
1 files changed, 4 insertions, 3 deletions
diff --git a/IkiWiki/Plugin/tla.pm b/IkiWiki/Plugin/tla.pm index f5ad0cc96..80c015e3c 100644 --- a/IkiWiki/Plugin/tla.pm +++ b/IkiWiki/Plugin/tla.pm @@ -98,12 +98,13 @@ sub rcs_prepedit ($) { } } -sub rcs_commit ($$$;$$) { +sub rcs_commit ($$$;$$$) { my $file=shift; my $message=shift; my $rcstoken=shift; my $user=shift; my $ipaddr=shift; + my $emailuser=shift; if (defined $user) { $message="web commit by $user".(length $message ? ": $message" : ""); @@ -139,10 +140,10 @@ sub rcs_commit ($$$;$$) { return undef # success } -sub rcs_commit_staged ($$$) { +sub rcs_commit_staged ($$$;$) { # Commits all staged changes. Changes can be staged using rcs_add, # rcs_remove, and rcs_rename. - my ($message, $user, $ipaddr)=@_; + my ($message, $user, $ipaddr, $emailuser)=@_; error("rcs_commit_staged not implemented for tla"); # TODO } |