luatz/timetable: Check argument to `new_from_timestamp`

[etc/awesome.git] / luatz / parse.lua

diff --git a/luatz/parse.lua b/luatz/parse.lua
index 2c5f8d36d4ab0dc6bb18fabb1e8e8648c4fc7480..f5cf735c7ac33a7878c27f1ae1c095c5fed4f2c4 100644 (file)
--- a/luatz/parse.lua
+++ b/luatz/parse.lua
@@ -17,7 +17,7 @@ local function rfc_3339 ( str , init )
        min   = tonumber ( min )
        sec   = tonumber ( sec )
 
        min   = tonumber ( min )
        sec   = tonumber ( sec )
 

-       local tt = new_timetable ( year , month , day , hour , min , sec )
+       local tt = new_timetable ( year , month , day , hour , min , sec )

 
        local tz_offset
        if str:match ("^[Zz]" , patt_end ) then
 
        local tz_offset
        if str:match ("^[Zz]" , patt_end ) then


@@ -25,7 +25,7 @@ local function rfc_3339 ( str , init )
        else
                local hour_offset , min_offset = str:match ( "^([+-]%d%d):(%d%d)" , patt_end )
                if hour_offset then
        else
                local hour_offset , min_offset = str:match ( "^([+-]%d%d):(%d%d)" , patt_end )
                if hour_offset then

-                       tz_offset = tonumber ( hour_offset )*60 + tonumber ( min_offset )
+                       tz_offset = tonumber ( hour_offset ) * 3600 + tonumber ( min_offset ) * 60

                else
                        -- Invalid RFC 3339 timestamp offset (should be Z or (+/-)hour:min
                        -- tz_offset will be nil
                else
                        -- Invalid RFC 3339 timestamp offset (should be Z or (+/-)hour:min
                        -- tz_offset will be nil