Track rename of `mdw.collect' package.

diff --git a/net.lisp b/net.lisp
index 0a274235062e7f00f890fc45aeae4e2d06d9b119..9e893c135b22f592987611c5d3c3a1d3f869e0f7 100644 (file)
--- a/net.lisp
+++ b/net.lisp
@@ -27,7 +27,7 @@
 ;;; Packaging.
 
 (defpackage #:net
 ;;; Packaging.
 
 (defpackage #:net

-  (:use #:common-lisp #:mdw.base #:mdw.str #:mdw.collect)
+  (:use #:common-lisp #:mdw.base #:mdw.str #:collect)

   (:export #:ipaddr #:string-ipaddr #:ipaddr-byte #:ipaddr-string #:ipaddrp
           #:integer-netmask #:ipmask #:ipmask-cidl-slash #:make-ipnet
             #:string-ipnet #:ipnet #:ipnet-net #:ipnet-mask #:with-ipnet
   (:export #:ipaddr #:string-ipaddr #:ipaddr-byte #:ipaddr-string #:ipaddrp
           #:integer-netmask #:ipmask #:ipmask-cidl-slash #:make-ipnet
             #:string-ipnet #:ipnet #:ipnet-net #:ipnet-mask #:with-ipnet

diff --git a/zone.lisp b/zone.lisp
index 91f2386fee0175518a642756986b691930c8f334..1f421a5c443c2a7f77f266413cc2de7f80dc2c11 100644 (file)
--- a/zone.lisp
+++ b/zone.lisp
@@ -27,7 +27,7 @@
 ;;; Packaging.
 
 (defpackage #:zone
 ;;; Packaging.
 
 (defpackage #:zone

-  (:use #:common-lisp #:mdw.base #:mdw.str #:mdw.collect #:safely #:net)
+  (:use #:common-lisp #:mdw.base #:mdw.str #:collect #:safely #:net)

   (:export #:soa #:mx #:zone #:zone-record #:zone-subdomain
           #:*default-zone-source* #:*default-zone-refresh*
             #:*default-zone-retry* #:*default-zone-expire*
   (:export #:soa #:mx #:zone #:zone-record #:zone-subdomain
           #:*default-zone-source* #:*default-zone-refresh*
             #:*default-zone-retry* #:*default-zone-expire*