diff options
author | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-11-22 04:06:56 +0000 |
---|---|---|
committer | joey <joey@0fa5a96a-9a0e-0410-b3b2-a0fd24251071> | 2006-11-22 04:06:56 +0000 |
commit | 7a9fd7f2fa111ba8aec3e1506e114fd398e22453 (patch) | |
tree | 8fc5739d4cf2a1f043910dafe4e2ac3915a43894 | |
parent | ed982a6f30c63d264cec62d30dcfb17537be50e2 (diff) |
fix user determination for web commits
-rw-r--r-- | IkiWiki/Rcs/svn.pm | 11 |
1 files changed, 6 insertions, 5 deletions
diff --git a/IkiWiki/Rcs/svn.pm b/IkiWiki/Rcs/svn.pm index ee5065379..fbf6b2c9e 100644 --- a/IkiWiki/Rcs/svn.pm +++ b/IkiWiki/Rcs/svn.pm @@ -201,6 +201,12 @@ sub rcs_notify () { #{{{ my $user=`svnlook author $config{svnrepo} -r $rev`; chomp $user; + + my $message=`svnlook log $config{svnrepo} -r $rev`; + if ($message=~/$config{web_commit_regexp}/) { + $user=defined $2 ? "$2" : "$3"; + $message=$4; + } my @changed_pages; foreach my $change (`svnlook changed $config{svnrepo} -r $rev`) { @@ -213,11 +219,6 @@ sub rcs_notify () { #{{{ require IkiWiki::UserInfo; send_commit_mails( sub { - my $message=`svnlook log $config{svnrepo} -r $rev`; - if ($message=~/$config{web_commit_regexp}/) { - $user=defined $2 ? "$2" : "$3"; - $message=$4; - } return $message; }, sub { |