Fix release restore

Shirakumo · Aug 8, 2024 · b33af4a · b33af4a
1 parent 9f85987
commit b33af4a
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/plaintext.lisp b/plaintext.lisp
@@ -127,7 +127,7 @@
   (apply #'reinitialize-instance object (retrieve-plaintext object)))
 
 (defmethod retrieve ((*storage* plaintext) (object release) (slot (eql 'projects)))
-  (setf (projects object) (retrieve-listed object slot 'project
+  (setf (projects object) (retrieve-listed object slot 'project-release
                                            (if (slot-boundp object 'projects) (projects object) ()))))
 
 (defmethod retrieve ((*storage* plaintext) (object (eql 'project)) (name string))