use new meta setting for storage/folder

2024-10-12 15:50:55 +02:00 · 2024-10-12 15:50:55 +02:00 · 876e11b0c9
commit 876e11b0c9
parent 89ec658652
1 changed files with 4 additions and 1 deletions
--- a/storage/folder.lisp
+++ b/storage/folder.lisp
@ -11,7 +11,10 @@
 (in-package :scopes/storage/folder)

 (defclass folder (tracking:track)
-  ((shape:head-fields :initform '(:parentid :name :ref))
+  ((shape:meta :initform 
+               (make-instance 'shape:record-meta
+                              :head-fields '(:parentid :name :ref))
+               :allocation :class)
   (tracking:key-fields :initform '(:parentid :name))))

 (defun indexes (cont)