basic-consume redelivers when it shouldnt

[Kingsy]

Hi,

This is my code.

  (handler-case
      (progn
	(with-connection (conn)
	    (let ((socket (tcp-socket-new conn)))
		(socket-open socket *rabbitmq-host* 5672)
		(login-sasl-plain conn *vhost* *rabbitmq-username* *rabbitmq-password*)
		(with-channel (conn 1)
		    (let ((queue-name *queue-name*))
			(basic-consume conn 1 queue-name)
		  )))))
    (error (err)
      (print "Error during process")
      (princ err))))

This works and I can basic ack if I want to. However the above code causes 18/s redelivery events to occur if I observe the rabbitmq dashboard. Why might this be? This feels a bit problematic with massive unnecessary network overhead.

Thanks

Chris