zoneinfo2lua.pl: fix path, update to match trunk

Fix the path to timezone data in Luci to match the current structure.
Change zoneinfo2lua.pl to generate short copyright messages like trunk.
Change the advice on line 3 about directory, where this script
should be run.

Signed-off-by: Hannu Nyman <hannu.nyman@iki.fi>
This commit is contained in:
Hannu Nyman 2015-04-19 11:02:52 +03:00
parent b0dbd371c8
commit a2bf02382e

View file

@ -1,6 +1,6 @@
#!/usr/bin/perl
# zoneinfo2lua.pl - Make Lua module from /usr/share/zoneinfo
# Execute from within /usr/share/zoneinfo
# Execute from within root of Luci feed, usually feeds/luci
# $Id$
use strict;
@ -8,7 +8,7 @@ use strict;
my %TZ;
my $tzdin = $ARGV[0] || "/usr/share/zoneinfo";
my $tzdout = $ARGV[1] || "./libs/sys/luasrc/sys/zoneinfo";
my $tzdout = $ARGV[1] || "./modules/base/luasrc/sys/zoneinfo";
local $/ = "\012";
open( ZTAB, "< $tzdin/zone.tab" ) || die "open($tzdin/zone.tab): $!";
@ -51,16 +51,7 @@ open(O, "> $tzdout/tzdata.lua") || die "open($tzdout/tzdata.lua): $!\n";
print STDERR "Writing time zones to $tzdout/tzdata.lua ... ";
print O <<HEAD;
--[[
LuCI - Autogenerated Zoneinfo Module
Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0
]]--
-- Licensed to the public under the Apache License 2.0.
module "luci.sys.zoneinfo.tzdata"
@ -81,16 +72,7 @@ open (O, "> $tzdout/tzoffset.lua") || die "open($tzdout/tzoffset.lua): $!\n";
print STDERR "Writing time offsets to $tzdout/tzoffset.lua ... ";
print O <<HEAD;
--[[
LuCI - Autogenerated Zoneinfo Module
Licensed under the Apache License, Version 2.0 (the "License");
you may not use this file except in compliance with the License.
You may obtain a copy of the License at
http://www.apache.org/licenses/LICENSE-2.0
]]--
-- Licensed to the public under the Apache License 2.0.
module "luci.sys.zoneinfo.tzoffset"