Assertions on the store directory

This setf has no effect (remember that we're in a :before method).  For now, I'd just keep the ```(setf (store-directory store) ...``` in the :after method.