cage
/
tinmop
mirror of https://codeberg.org/cage/tinmop/
1
0
Fork 0
Code Issues

used correct type for tags in status (was using 'tag' instead of 'status-tag').

This commit is contained in:
cage 2023-10-14 14:26:09 +02:00
parent a70b636d44
commit 5c76bfb45b
1 changed files with 1 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/db.lisp
View File

@ -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