SVN-Log bug

My Patch for SVN::Log reported as #45832: Author: "(no author)" not parsed.

SVN::Log, line 212
-  my $headrule = qr/r(\d+) \| (\w+) \| (\d{4}-\d{2}-\d{2}\d{2}:\d{2}:\d{2})/;
+  my $headrule = qr/r(\d+) \| (.+?) \| (\d{4}-\d{2}-\d{2}\d{2}:\d{2}:\d{2})/;

Tested with:

my $log = SVN::Log::retrieve({
    'repository' => "https://svn.parrot.org/parrot/",
    'start' => 1907,
    'end' => 1907,
});