X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/lisp/blobdiff_plain/2d8bac2c972c9fc294f48df7b6afc34fab744608..5fa07b7aaf3aaeaedaf283527dc58d69b69fe07e:/safely.lisp diff --git a/safely.lisp b/safely.lisp index c78492a..abb2fb2 100644 --- a/safely.lisp +++ b/safely.lisp @@ -23,12 +23,12 @@ ;;; 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."