From 2066f225bf6a438e48efe50a49ef6148f1cf1bce Mon Sep 17 00:00:00 2001
From: mainzelm <mainzelm>
Date: Mon, 2 Feb 2004 10:21:20 +0000
Subject: [PATCH] Fixed parsing of comments in resolv.conf

---
 scheme/lib/dns.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/scheme/lib/dns.scm b/scheme/lib/dns.scm
index ae04c41..1218658 100644
--- a/scheme/lib/dns.scm
+++ b/scheme/lib/dns.scm
@@ -1189,7 +1189,7 @@
 	   ((eof-object? l)
 	    (adjust-result rev-result #f '()))
 	   ((regexp-search
-	     (rx (: bos ("#;")))
+	     (rx (: bos (| "#" ";")))
 	     l)
 	    (loop rev-result))
 	   ((regexp-search