aboutsummaryrefslogtreecommitdiff
path: root/hatask.ha
diff options
context:
space:
mode:
Diffstat (limited to 'hatask.ha')
-rw-r--r--hatask.ha8
1 files changed, 8 insertions, 0 deletions
diff --git a/hatask.ha b/hatask.ha
index a5d9141..69d89b2 100644
--- a/hatask.ha
+++ b/hatask.ha
@@ -174,6 +174,7 @@ export fn main() void = {
('c', "context", "context filter"),
('t', "tags", "tags filter"),
('p', "sort by priority"),
+ ('d', "activate debug mode"),
("filter", ["filter tasks", "id"]: []getopt::help),
("f", ["filter tasks", "id"]: []getopt::help),
("show", ["show task details", "id"]: []getopt::help),
@@ -205,6 +206,7 @@ export fn main() void = {
defer cfinish(&cfg);
const sortfn: *sort::cmpfunc = &sortname;
+ let debug = false;
for (let opt .. cmd.opts) {
switch (opt.0) {
case 'f' =>
@@ -215,11 +217,17 @@ export fn main() void = {
cfg.tags = strings::dupall(strings::split(opt.1, ","));
case 'p' =>
sortfn = &sortpriority;
+ case 'd' =>
+ debug = true;
case =>
abort();
};
};
+ if (debug) {
+ printconfig(cfg);
+ };
+
const tasks = match (listtasks(cfg.tasksdir, cfg.context)) {
case let e: rtaskerror =>
fmt::fatal(strrtaskerror(e));