foo

[www/ikiwiki.git] / ikiwiki

diff --git a/ikiwiki b/ikiwiki
index 33d1ae709d17070715e4fffec5dd5f124f3a0709..5ae95e59d71eeb19e104ef48978d5965a137b11b 100755 (executable)
--- a/ikiwiki
+++ b/ikiwiki
@@ -446,14 +446,18 @@ sub rcs_recentchanges ($) { #{{{
                                $state='body';
                        }
                        elsif ($state eq 'body' && /$div/) {
-                               print STDERR ">>$message[0]<<\n";
+                               my $committype="web";
                                if (defined $message[0] &&
-                                   $message[0]=~/^web commit by (\w+)(.*)/) {
-                                       $user="$1 (web)";
-                                       $message[0]=$2;
+                                   $message[0]->{line}=~/^web commit by (\w+):?(.*)/) {
+                                       $user="$1";
+                                       $message[0]->{line}=$2;
+                               }
+                               else {
+                                       $committype="svn";
                                }
                                
                                push @ret, { rev => $rev, user => $user,
+                                       commitype => $committype,
                                        when => $when, message => [@message],
                                        pages => [@pages] } if @pages;
                                return @ret if @ret >= $num;