Plaster

(eval-when (:compile-toplevel :load-toplevel :execute) (ql:quickload "cs325") (when (find-package :cs325-user) (tpl:setq-default *package* (find-package :cs325-user)) (rplacd (assoc 'tpl::*saved-package* tpl:*default-lisp-listener-bindings*) 'common-lisp:*package*)))