From 670428d3c4fa8280fb415dad61badd4f283d3a55 Mon Sep 17 00:00:00 2001 From: Colin Okay Date: Mon, 28 Feb 2022 11:47:26 -0600 Subject: new config creation wizard --- build-app.lisp | 5 +++++ 1 file changed, 5 insertions(+) (limited to 'build-app.lisp') diff --git a/build-app.lisp b/build-app.lisp index 793ffae..f0ae688 100644 --- a/build-app.lisp +++ b/build-app.lisp @@ -39,6 +39,8 @@ my1337pw.") :description "Return flagged oneliners. Ignores TAGS. Respects --limit") (flag :long-name "not-flagged" :description "Request that no flagged oneliners are returned.") + (flag :long-name "newest" + :description "Return newest oneliners. Ignores TAGs. Respects --limit up to server specified maxiumum.") (stropt :long-name "brief-like" :argument-name :optional :default-value ".*" @@ -132,6 +134,9 @@ than the users." ((getopt :long-name "all-flagged") (cli::all-flagged-oneliners (getopt :long-name "limit"))) + ((getopt :long-name "newest") + (cli::newest-oneliners (getopt :long-name "limit"))) + (arguments ;; when the first argument is a number, try run a oneliner (a:when-let (hist-number (parse-integer (first arguments) :junk-allowed t)) -- cgit v1.2.3