diff --git a/users/sterni/mblog/cli.lisp b/users/sterni/mblog/cli.lisp
index 555f8def5..cd0a6ae39 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