diff options
Diffstat (limited to 'etc/check-links.lua')
-rw-r--r-- | etc/check-links.lua | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/etc/check-links.lua b/etc/check-links.lua index 0dca27c..705c0ce 100644 --- a/etc/check-links.lua +++ b/etc/check-links.lua | |||
@@ -1,3 +1,7 @@ | |||
1 | ----------------------------------------------------------------------------- | ||
2 | -- Little program that checks links in HTML files | ||
3 | -- LuaSocket 1.5 sample files. | ||
4 | ----------------------------------------------------------------------------- | ||
1 | socket.http.TIMEOUT = 10 | 5 | socket.http.TIMEOUT = 10 |
2 | 6 | ||
3 | cache = {} | 7 | cache = {} |
@@ -14,7 +18,7 @@ end | |||
14 | 18 | ||
15 | function getstatus(url) | 19 | function getstatus(url) |
16 | local parsed = socket.url.parse(url, { scheme = "file" }) | 20 | local parsed = socket.url.parse(url, { scheme = "file" }) |
17 | if cache[url] then return cache[url].res end | 21 | if cache[url] then return cache[url] end |
18 | local res | 22 | local res |
19 | if parsed.scheme == "http" then | 23 | if parsed.scheme == "http" then |
20 | local request = { url = url } | 24 | local request = { url = url } |
@@ -34,7 +38,7 @@ function getstatus(url) | |||
34 | res = nil | 38 | res = nil |
35 | else res = error end | 39 | else res = error end |
36 | else res = string.format("unhandled scheme '%s'", parsed.scheme) end | 40 | else res = string.format("unhandled scheme '%s'", parsed.scheme) end |
37 | cache[url] = { res = res } | 41 | cache[url] = res |
38 | return res | 42 | return res |
39 | end | 43 | end |
40 | 44 | ||