diff options
Diffstat (limited to 'build-app.lisp')
| -rw-r--r-- | build-app.lisp | 5 |
1 files changed, 5 insertions, 0 deletions
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)) |