Commit 3472ec52 authored by Dave Cooper's avatar Dave Cooper
Browse files

Fix incorrect package in paserve/zaserve publish.lisp.

parent 9b9a9229

servers/paserve/publish.lisp

+1 −1
Original line number Diff line number Diff line
@@ -86,4 +86,4 @@ 


(defun aserve-socket-port (socket)

  (#+(or zacl allegro) socket:local-port

     #+(and (not (or zacl allegro)) acl-compat) acl-compat:local-port socket))
 
     #+(and (not (or zacl allegro)) acl-compat) acl-compat.socket:local-port socket))

servers/zaserve/publish.lisp

+1 −1
Original line number Diff line number Diff line
@@ -80,6 +80,6 @@ 


(defun aserve-socket-port (socket)

  (#+(or zacl allegro) socket:local-port

     #+(and (not (or zacl allegro)) acl-compat) acl-compat:local-port socket))

     #+(and (not (or zacl allegro)) acl-compat) acl-compat.socket:local-port socket))