if (defined $u) {
$u=encode_utf8($u);
$ENV{GIT_AUTHOR_NAME}=$u;
+ }
+ if (defined $params{session}->param("username")) {
+ $u=encode_utf8($params{session}->param("username"));
+ }
+ if (defined $u) {
$ENV{GIT_AUTHOR_EMAIL}="$u\@web";
}
}
my $file=shift;
my $id=shift; # 0 = mtime ; 1 = ctime
- # Remove srcdir prefix
- $file =~ s/^\Q$config{srcdir}\E\/?//;
-
if (! keys %time_cache) {
my $date;
foreach my $line (run_or_die('git', 'log',