From 0f09a250632b1f10c9a1986eacf5f4e0b5dbc9f0 Mon Sep 17 00:00:00 2001
From: Ray Miller <ray@metail.co.uk>
Date: Wed, 29 Jan 2025 11:45:47 +0000
Subject: [PATCH] Comment-out debugging

---
 guile/broken-link-checker.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guile/broken-link-checker.scm b/guile/broken-link-checker.scm
index f644ffe..dc85b46 100755
--- a/guile/broken-link-checker.scm
+++ b/guile/broken-link-checker.scm
@@ -189,7 +189,7 @@ along with this program.  If not, see <http://www.gnu.org/licenses/>.
   (let ((memo (make-hash-table)))
     (lambda (uri)
       (let ((key (uri->string uri)))
-        (pk 'http-head-memoized key)
+        ;;(pk 'http-head-memoized key)
         (unless (hash-ref memo key #f)
           (with-exception-handler
               (lambda (e)