refactoring by skill

This commit is contained in:
2026-08-29 22:22:49 +02:00
parent 67fce7a330
commit 649ff0d7c5
22 changed files with 1598 additions and 1644 deletions
+3 -3
View File
@@ -830,7 +830,7 @@ SQL
(and version-number
(call-with-wiki-database
config
(lambda (db)
(λ (db)
(and
(query-maybe-value
db
@@ -962,13 +962,13 @@ SQL
'externalUrl)
"https://example.com/path")
(check-exn exn:fail?
(lambda ()
(λ ()
(concept-content
(hash 'id concept-a
'label "Unsafe concept"
'externalUrl "javascript:alert(1)"))))
(check-exn exn:fail?
(lambda ()
(λ ()
(concept-map-storage-document
(hash 'concepts (list (hash 'id "legacy:map:concept-1"))
'items '())))))