Files
passepartout/skills/org-skill-tool-permissions.org
Amr Gharbeia dd8bb6e3c8 refactor(skills): use XDG paths for tangle destinations
- Updated all 22 skill org files to use $OC_DATA_DIR/skills/ paths
- Removed manually created .lisp file (tangling now targets XDG)
- Files will now tangle to ~/.local/share/opencortex/skills/
2026-04-30 11:09:21 -04:00

930 B

SKILL: Tool Permissions (org-skill-tool-permissions.org)

Overview

The Tool Permissions skill manages the authorization levels for different cognitive tools.

Implementation

Permission Registry

(defvar *tool-permissions* (make-hash-table :test 'equal))

(defun set-tool-permission (tool-name level)
  "Sets the permission level for a tool."
  (setf (gethash (string-downcase (string tool-name)) *tool-permissions*) level))

(defun get-tool-permission (tool-name)
  "Retrieves the permission level for a tool."
  (gethash (string-downcase (string tool-name)) *tool-permissions* :ask))

Skill Registration

(defskill :skill-tool-permissions
  :priority 600
  :trigger (lambda (ctx) (declare (ignore ctx)) nil))