v0.8.1: deduplication cleanup — remove duplicate defpackage/defvar blocks from programming-tools, duplicate plist-keywords-normalize from programming-lisp, duplicate *VAULT-MEMORY* from security-vault; TUI defensive fixes — add word-wrap function, wrap on-key in ignore-errors; daemon startup hardening — optional skill loads with handler-case
This commit is contained in:
@@ -236,33 +236,6 @@ The skill has four layers:
|
||||
|
||||
** Plist Keywords Normalize (relocated from core-reason)
|
||||
|
||||
|
||||
|
||||
Lisp keywords are case-sensitive. The LLM might produce ~:payload~ or ~:PAYLOAD~ depending on the model. This function normalizes keyword keys to uppercase.
|
||||
|
||||
|
||||
|
||||
#+begin_src lisp
|
||||
|
||||
(defun plist-keywords-normalize (plist)
|
||||
|
||||
(when (listp plist)
|
||||
|
||||
(loop for (k v) on plist by #'cddr
|
||||
|
||||
collect (if (and (symbolp k) (not (keywordp k)))
|
||||
|
||||
(intern (string k) :keyword)
|
||||
|
||||
k)
|
||||
|
||||
collect v)))
|
||||
|
||||
#+end_src
|
||||
|
||||
|
||||
** Plist Keywords Normalize (relocated from core-reason)
|
||||
|
||||
Lisp keywords are case-sensitive. The LLM might produce :payload or :PAYLOAD depending on the model. This function normalizes keyword keys to uppercase.
|
||||
|
||||
#+begin_src lisp
|
||||
|
||||
Reference in New Issue
Block a user