From 3d6974fb3fb3fdf49ce9e97eef71f23615306d49 Mon Sep 17 00:00:00 2001
From: Colin Okay <okay@toyful.space>
Date: Mon, 28 Feb 2022 09:41:07 -0600
Subject: fetching newest oneliners puts newest first

---
 src/main.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

(limited to 'src')

diff --git a/src/main.lisp b/src/main.lisp
index 4a0c2d1..76d0df9 100644
--- a/src/main.lisp
+++ b/src/main.lisp
@@ -508,7 +508,7 @@ started, this will allow remote live debugging of the system.
 
 (defun newest-oneliners (&optional limit)
   (bt:with-lock-held (*newest-queue-lock*)
-    (qb-look *newest-queue*)))
+    (qb-look *newest-queue* :limit limit :reversep t)))
 
 (defun flagged-oneliners (&optional limit)
   (loop
-- 
cgit v1.2.3