From aaffda3119dd72b9c0e01f2229d65d52ca1b98ff Mon Sep 17 00:00:00 2001 From: Klaus Schmidinger Date: Mon, 4 Mar 2013 12:14:09 +0100 Subject: Added the system's character set to the page header in the epg2html script --- epg2html | 24 +++++++++++++++++++----- 1 file changed, 19 insertions(+), 5 deletions(-) (limited to 'epg2html') diff --git a/epg2html b/epg2html index 8b9e7b1f..5062e70f 100755 --- a/epg2html +++ b/epg2html @@ -12,9 +12,11 @@ # See the main source file 'vdr.c' for copyright information and # how to reach the author. # -# $Id: epg2html 2.1 2011/12/04 14:17:35 kls Exp $ +# $Id: epg2html 2.2 2013/03/04 12:13:11 kls Exp $ @Index = (); +($Charset = $ENV{LANG}) =~ s/^[^.]*\.?(.*)/$1/; +$Charset = "utf-8" unless $Charset || $ENV{LANG} == 'C'; sub GetDay { @@ -79,10 +81,16 @@ while (<>) { } push(@Schedule, "\n") if (@Schedule); open(PAGE, ">$Page") or die "$Page: $!\n"; - print PAGE "\n$Channel\n\n"; + print PAGE "\n"; + print PAGE "\n"; + print PAGE "$Channel\n"; + print PAGE "\n"; + print PAGE "\n"; + print PAGE "\n"; print PAGE "

$Channel

\n"; print PAGE @Schedule; - print PAGE "\n\n"; + print PAGE "\n"; + print PAGE "\n"; close(PAGE); last; } @@ -91,7 +99,13 @@ while (<>) { } open(INDEX, ">index.htm") or die "index.htm: $!\n"; -print INDEX "\nEPG Index\n\n"; +print INDEX "\n"; +print INDEX "\n"; +print INDEX "EPG Index\n"; +print INDEX "\n"; +print INDEX "\n"; +print INDEX "\n"; print INDEX sort { lc($a) cmp lc($b) } @Index; -print INDEX "\n\n"; +print INDEX "\n"; +print INDEX "\n"; close(INDEX); -- cgit v1.2.3