All patches and comments are welcome. Please squash your changes to logical
commits before using git-format-patch and git-send-email to
patches@git.madduck.net.
If you'd read over the Git project's submission guidelines and adhered to them,
I'd be especially grateful.
4 Licensed under GNU General Public License v2
5 * (c) 2013, Luke Bonham
6 * (c) 2010-2012, Peter Hofmann
10 local newtimer = require("lain.helpers").newtimer
12 local wibox = require("wibox")
14 local util = require("lain.util")
16 local io = { popen = io.popen }
17 local os = { getenv = os.getenv }
19 local string = { len = string.len,
20 match = string.match }
21 local table = { sort = table.sort }
23 local setmetatable = setmetatable
26 -- lain.widgets.maildir
29 local function worker(args)
30 local args = args or {}
31 local timeout = args.timeout or 60
32 local mailpath = args.mailpath or os.getenv("HOME") .. "/Mail"
33 local ignore_boxes = args.ignore_boxes or {}
34 local settings = args.settings or function() end
36 maildir.widget = wibox.widget.textbox('')
39 -- Find pathes to mailboxes.
40 local p = io.popen("find " .. mailpath ..
41 " -mindepth 1 -maxdepth 1 -type d" ..
48 -- Find all files in the "new" subdirectory. For each
49 -- file, print a single character (no newline). Don't
50 -- match files that begin with a dot.
51 -- Afterwards the length of this string is the number of
52 -- new mails in that box.
53 local np = io.popen("find " .. line ..
54 "/new -mindepth 1 -type f " ..
55 "-not -name '.*' -printf a")
56 local mailstring = np:read("*a")
58 -- Strip off leading mailpath.
59 local box = string.match(line, mailpath .. "/*([^/]+)")
60 local nummails = string.len(mailstring)
71 --Count the total number of mails irrespective of where it was found
74 for box, number in pairs(boxes)
76 -- Add this box only if it's not to be ignored.
77 if not util.element_in_table(box, ignore_boxes)
79 total = total + number
80 if newmail == "no mail"
82 newmail = box .. "(" .. number .. ")"
84 newmail = newmail .. ", " ..
85 box .. "(" .. number .. ")"
90 widget = maildir.widget
94 newtimer(mailpath, timeout, update, true)
98 return setmetatable(maildir, { __call = function(_, ...) return worker(...) end })