summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authorAndreas Brachold <vdr07@deltab.de>2009-12-19 13:50:17 +0000
committerAndreas Brachold <vdr07@deltab.de>2009-12-19 13:50:17 +0000
commit088518042587c633b662d054375c9801bed844f4 (patch)
tree1ac3ba2672d83314e40646e2857e7910d1788a85 /bin
parentfd94b0111202e094cc4b2b8272eb5d637aed719b (diff)
downloadxxv-088518042587c633b662d054375c9801bed844f4.tar.gz
xxv-088518042587c633b662d054375c9801bed844f4.tar.bz2
* CHANNELS: allow query a compact list ( by cmd=clist&compact=1 )
* STATUS: Refactoring output (network/filesys/memory/vitals) * STREAM: Fix SMB streaming (div by zero) * html/xstyle: footer updated * xstyle: css fix correct z-index on schema for timemarker * jason: use one loading mask for many tasks * jason: timer self updating if new timer created * jason: stream allow external video player * jason: use compact channel list (reduce memory footprint) * update translations
Diffstat (limited to 'bin')
-rwxr-xr-xbin/xxvd11
1 files changed, 8 insertions, 3 deletions
diff --git a/bin/xxvd b/bin/xxvd
index 348a3b5..b3b4c9f 100755
--- a/bin/xxvd
+++ b/bin/xxvd
@@ -507,7 +507,7 @@ sub init_locale {
return ($charset,$useutf8);
}
-
+my $LOG_FAILED = undef;
# ------------------
sub init_logging {
# ------------------
@@ -534,8 +534,13 @@ sub init_logging {
my $mode = '>>';
#$mode .= ':utf8' if($Tools::CHARSET && $Tools::CHARSET eq 'UTF-8');
- my $fh = IO::File->new($loggerfile,$mode)
- or return print(sprintf("Couldn't write %s : %s!",$loggerfile,$!));
+ my $fh = IO::File->new($loggerfile,$mode);
+ unless ($fh) {
+ return if($LOG_FAILED);# log only once, if failed
+ $LOG_FAILED = 1;
+ return print(sprintf("Couldn't write %s : %s!",$loggerfile,$!));
+ }
+ $LOG_FAILED = undef;
# binmode $fh, ":encoding(utf8)" if($Tools::CHARSET eq 'UTF-8');
print $fh sprintf("%d (%d) [%s] %s\n",++$loggercnt, $errcode, $tt, $msg);
$fh->close;