diff --git a/storage/folder.lisp b/storage/folder.lisp index 19d8cc3..776dae6 100644 --- 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)