| … | … | ||
|---|---|---|---|
| 57 | } | 57 | } |
| 58 | 58 | ||
| 59 | sub logprint { | 59 | sub logprint { |
| 60 | my ($self, @a) = @_; | 60 | my ($self, @a) = @_; |
| 61 | 61 | ||
| 62 | return; | ||
| 62 | $self->{log_fh} ||= do { | 63 | $self->{log_fh} ||= do { |
| 63 | my $path = "$Crossfire::VARDIR/log.$self->{host}"; | 64 | my $path = "$Crossfire::VARDIR/log.$self->{host}"; |
| 64 | 65 | ||
| 65 | open my $fh, ">>:utf8", $path | 66 | open my $fh, ">>:utf8", $path |
| 66 | or die "Couldn't open logfile $path: $!"; | 67 | or die "Couldn't open logfile $path: $!"; |
| – | Removed lines |
| + | Added lines |
| < | Changed lines |
| > | Changed lines |