removed debug msg

2026-06-30 12:45:36 +02:00
parent 26b9fa6f32
commit 7826f52b25
1 changed files with 0 additions and 4 deletions
@@ -359,10 +359,6 @@
    (define (log-processed-file base-path path info)
      (dbg-am "processing ~a" path)

-      (let ((re #px"Willi Bos"))
-	(when (regexp-match re (path->string path))
-	  (info-am "Hey: ~a - ~a" (basename path) info)))
-
      (if (eq? (hash-ref info 'type) 'dir)
          (set! processed-dirs (+ processed-dirs 1))
          (begin