}
# editlog¥×¥é¥°¥¤¥ó¤Î¥í¥°¤«¤éÊÔ½¸¼Ô¤Î¥æ¡¼¥¶Ì¾¤ò¼èÆÀ
+ # ¡Êeditlog¤ÎÆüÉÕ¤¬¥º¥ì¤ë¤³¤È¤¬¤¢¤Ã¤¿¤Î¤Ç1ÉðÊÆâ¤Î¹¹¿·¤ÏƱ¤¸ÍúÎò¤È¤ß¤Ê¤¹¤è¤¦¤Ë¤·¤Æ¤Þ¤¹¡Ë
my $editlog = {};
if($wiki->config('log_dir') ne "" && -e $wiki->config('log_dir')."/useredit.log"){
open(DATA,$wiki->config('log_dir')."/useredit.log") or die $!;
my($date, $time, $unixtime, $action, $subject, $id) = split(" ",$_);
if($subject eq $page){
if($id eq ''){
- $editlog->{$unixtime} = 'anonymous';
+ $editlog->{substr($unixtime, 0, length($unixtime) - 4)} = 'anonymous';
} else {
- $editlog->{$unixtime} = $id;
+ $editlog->{substr($unixtime, 0, length($unixtime) - 4)} = $id;
}
}
}
$buf .= "<a href=\"".$wiki->create_url({ action=>"DIFF",page=>$page,generation=>($#list-$count) })."\">".&Util::format_date($time).
"</a> <a href=\"".$wiki->create_url({ action=>"SOURCE",page=>$page,generation=>($#list-$count) })."\">¥½¡¼¥¹</a>";
- if(defined($editlog->{$time})){
- $buf .= " by ".$editlog->{$time};
+ if(defined($editlog->{substr($time, 0, length($time) - 4)})){
+ $buf .= " by ".$editlog->{substr($time, 0, length($time) - 4)};
}
$buf .= "</li>\n";