cage/tinmop
1
0
Fork 0
mirror of https://codeberg.org/cage/tinmop/ synced 2025-02-18 08:20:35 +01:00
Code Issues

- ensured the colmuns are correctly quoted when performing local search.

Browse Source
This commit is contained in:
cage 2024-06-15 17:24:39 +02:00
parent c119600081
commit d65b98499c
2 changed files with 8 additions and 7 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
src/db.lisp
View File

@ -1719,7 +1719,8 @@ that identify a single message in table :status"
account-id account-id
&rest &rest
where-clauses) where-clauses)
"Query the table status "Query the table status joined with table `account` for some extra
information (see the function `gen-message-select').
- other-column fetch other column from table :status or :account (the - other-column fetch other column from table :status or :account (the
default columns are all the ones of table status and the columns default columns are all the ones of table status and the columns

12
src/fediverse-post-local-search.lisp
View File

@ -29,19 +29,19 @@
(:constant nil)) (:constant nil))
(defrule fedisearch-column (or (defrule fedisearch-column (or
"\"status-id\"" "status-id"
"\"account-id\"" "account-id"
"username" "username"
"account" "account"
"uri" "uri"
"content" "content"
"\"rendered-text\"" "rendered-text"
"visibility" "visibility"
"sensitive" "sensitive"
"spoiler-text" "spoiler-text"
"reblogs-count" "reblogs-count"
"\"favourites-count\"" "favourites-count"
"\"replies-count\"" "replies-count"
"url" "url"
"language" "language"
"favourited" "favourited"
@ -52,7 +52,7 @@
"redp" "redp"
"timeline" "timeline"
"folder") "folder")
(:text t)) (:function (lambda (a) (db::quote-symbol a))))
(defrule fedisearch-column-value (and #\" (+ (not #\")) #\") (defrule fedisearch-column-value (and #\" (+ (not #\")) #\")
(:text t)) (:text t))