From 5c76bfb45b15ce30edf6d8ac33a0511931bb9473 Mon Sep 17 00:00:00 2001 From: cage Date: Sat, 14 Oct 2023 14:26:09 +0200 Subject: [PATCH] used correct type for tags in status (was using 'tag' instead of 'status-tag'). --- src/db.lisp | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/db.lisp b/src/db.lisp index c51e747..f57fd0f 100644 --- a/src/db.lisp +++ b/src/db.lisp @@ -1362,8 +1362,7 @@ than (swconf:config-purge-history-days-offset) days in the past" (loop for tag in tags for tag-name in tag-names do - (let ((tag-history (or (tooter:history tag) - (api-client:make-placeholder-tag-histogram)))) + (let ((tag-history (api-client:make-placeholder-tag-histogram))) (update-db tag-history :tag tag-name))) (update-db parent :skip-ignored-p skip-ignored-p