--- deliantra/server/ext/schmorplog.ext 2008/05/03 11:14:50 1.19 +++ deliantra/server/ext/schmorplog.ext 2008/05/03 13:29:14 1.20 @@ -116,7 +116,7 @@ my $s = $pl->ob->{stats_death} or return $who->reply ($npc, "$args didn't die even once."); - my $rep = "$args died a total of " . $pl->ob->kv_set ("schmorplog_death_count") . " times, among them:\n\n\n\n"; + my $rep = "$args died a total of " . $pl->ob->kv_get ("schmorplog_death_count") . " times, among them:\n\n\n\n"; for (sort { $s->{$b} <=> $s->{$a} } keys %$s) { $rep .= "$s->{$_} time(s) due to $_.\n\n";