Update of /project/zip/cvsroot/zip In directory common-lisp.net:/tmp/cvs-serv1823 Modified Files: acl.lisp Log Message: fixed typo (thanks to Edi Weitz) Date: Tue Apr 5 16:04:01 2005 Author: dlichteblau Index: zip/acl.lisp diff -u zip/acl.lisp:1.1.1.1 zip/acl.lisp:1.2 --- zip/acl.lisp:1.1.1.1 Sun Apr 3 21:36:28 2005 +++ zip/acl.lisp Tue Apr 5 16:04:01 2005 @@ -4,7 +4,7 @@ (excl:octets-to-string octets :external-format ef)) (defun string-to-octets (string ef) - (excl:string-to-octets octets :external-format ef)) + (excl:string-to-octets string :external-format ef)) (defun make-buffer-output-stream (outbuf) (excl:make-buffer-output-stream outbuf))