From 9924bfa510d590b1218f6da083e736957abf7608 Mon Sep 17 00:00:00 2001
From: Colin Okay <okay@toyful.space>
Date: Wed, 9 Feb 2022 07:20:48 -0600
Subject: removed obsolete utility

---
 lazybones.lisp | 11 -----------
 1 file changed, 11 deletions(-)

diff --git a/lazybones.lisp b/lazybones.lisp
index 3cf3bad..c04e1e4 100644
--- a/lazybones.lisp
+++ b/lazybones.lisp
@@ -366,17 +366,6 @@ making a new one if not."
 
 ;;; utilities
 
-(defun set-response-headers (&rest headers)
-  "Sets response headers for *RESPONSE*. Handy for setting many headers at once.
-
-E.g.
-(set-response-headers 
-  :content-type \"text/html\"
-  :content-length (length html-bytes))"
-  (loop for (name value . more) on headers by #'cddr
-        do (setf (response-header name *response*) value)))
-
-
 (defun http-ok (content)
   "Content should be a string, a byte-vector, or a pathname to a local
 file.  CONTENT-TYPE should be a MIME type string."
-- 
cgit v1.2.3