From a84447cf9c06c2813df831b3fde105c45d02727c Mon Sep 17 00:00:00 2001
From: Random Hacker <random_hacker@xapek.org>
Date: Thu, 8 Mar 2012 11:28:44 +0100
Subject: ebus-racket: fix error handling in inserter

---
 ebus-racket/inserter.rkt | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

(limited to 'ebus-racket/inserter.rkt')

diff --git a/ebus-racket/inserter.rkt b/ebus-racket/inserter.rkt
index ab90911..b07207d 100755
--- a/ebus-racket/inserter.rkt
+++ b/ebus-racket/inserter.rkt
@@ -28,7 +28,8 @@
   (lambda ()
     (let loop ()
       (with-handlers ([exn:fail? (lambda (exn)
-                                   (log-message logger 'error (format "Failed to parse paket: ~a" exn) #t))])
+                                   (log-message logger 'error (format "Failed to parse paket: ~a" exn) #t)
+                                   (loop))])
         (let ([fields (layer7-read-ebus (current-input-port))])
 	  (when (not (or (void? fields) (eof-object? fields)))
 	    (handle-fields fields))
-- 
cgit v1.2.1