compressed-protocol: chipz accepts :zlib in place of 'chipz:zlib
authorAlejandro R Sedeño <asedeno@google.com>
Fri, 5 Apr 2013 13:04:56 +0000 (09:04 -0400)
committerAlejandro R Sedeño <asedeno@google.com>
Fri, 5 Apr 2013 13:04:56 +0000 (09:04 -0400)
src/wire-protocol/compressed-protocol.lisp

index 9d7375e..949dc55 100644 (file)
@@ -53,7 +53,7 @@ uncompressed, but for now using the Compression protocol requires both.
                 (let ((buffer (make-array decompressed-length :element-type '(unsigned-byte 8))))
                   (uiop/package:symbol-call
                    :chipz :decompress
-                   buffer (uiop/package:find-symbol* :zlib :chipz) payload)
+                   buffer :zlib payload)
                   buffer))
             sequence-id)))