[New function: import-parsed-spells clinton@unknownlamer.org**20080427172742] { hunk ./src/packages.lisp 57 + :parsed-spell->spell-object hunk ./src/packages.lisp 61 + :import-parsed-spells + + :spell-table-ref)) hunk ./src/packages.lisp 65 - :spell-table-ref - - :parsed-spell->spell-object)) hunk ./src/srd-import.lisp 402 - +(defun import-parsed-spells (parsed-spells) + (elephant::with-batch-transaction (spells 50 parsed-spells + :store-controller dnd-db:*db-store*) + (mapcar #'parsed-spell->spell-object spells))) }