diff options
| author | sterni <sternenseemann@systemli.org> | 2024-11-20T23·05+0100 |
|---|---|---|
| committer | clbot <clbot@tvl.fyi> | 2024-12-02T18·09+0000 |
| commit | 0c87789b31ecca4941b1d4a64a68afd1bc68593a (patch) | |
| tree | 5ab291a4a85c11ae0427d003b7e74c4e2de8fd82 | |
| parent | 3398c2ab7fbbc4d22a2c4540518ffe293ba9dc1c (diff) | |
fix(sterni/mblog): check for help flags in flag, not arg list r/8976
Change-Id: I9f353f7c8f66078b51e333b6b8653f07f7ff544d Reviewed-on: https://cl.tvl.fyi/c/depot/+/12816 Reviewed-by: sterni <sternenseemann@systemli.org> Autosubmit: sterni <sternenseemann@systemli.org> Tested-by: BuildkiteCI
| -rw-r--r-- | users/sterni/mblog/cli.lisp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/users/sterni/mblog/cli.lisp b/users/sterni/mblog/cli.lisp index 555f8def535f..cd0a6ae3911a 100644 --- a/users/sterni/mblog/cli.lisp +++ b/users/sterni/mblog/cli.lisp @@ -58,7 +58,7 @@ (help-requested-p (find-if (lambda (x) (member x '("-h" "--help" "--usage") :test #'string=)) - args))) + flags))) (apply (if help-requested-p #'display-help |