;;; along with this program; if not, write to the Free Software Foundation,
;;; Inc., 59 Temple Place - Suite 330, Boston, MA 02111-1307, USA.
-(defpackage #:mdw.safely
+(defpackage #:safely
(:use #:common-lisp #:mdw.base #:mdw.unix)
(:export #:safely #:safely-close #:safely-delete-file
#:safely-open-output-stream #:safely-bail #:safely-commit
#:safely-writing))
-(in-package #:mdw.safely)
+(in-package #:safely)
(defstruct (safely (:predicate safelyp))
"Stores information about how to commit or undo safe writes."