From 3e2b4aca15e8e230461d7ff1e33c86f155a160b8 Mon Sep 17 00:00:00 2001
From: Arun Isaac
Date: Thu, 23 Sep 2021 14:52:11 +0530
Subject: gnbug: Use get-line instead of read-line.

* gnbug: Do not import (ice-9 rdelim).
(file-details, git-updated-files, git-first-commit-since): Use
get-line from (rnrs io ports) instead of read-line from (ice-9
rdelim).
---
 gnbug | 9 ++++-----
 1 file changed, 4 insertions(+), 5 deletions(-)

diff --git a/gnbug b/gnbug
index 3027f8d..ac6ebbd 100755
--- a/gnbug
+++ b/gnbug
@@ -10,8 +10,7 @@
         (srfi srfi-171)
         (ice-9 ftw)
         (ice-9 match)
-        (ice-9 popen)
-        (ice-9 rdelim))
+        (ice-9 popen))
 
 (define (invoke program . args)
   (unless (zero? (apply system* program args))
@@ -158,7 +157,7 @@ strings, and return them as a list."
                                     (hashtable-set! result 'title
                                                     (remove-prefix "# " line)))))))
                         (const #t)
-                        read-line
+                        get-line
                         port)))
     result))
 
@@ -189,7 +188,7 @@ START-COMMIT and END-COMMIT."
                                                  ("M" 'modified))
                                                file)))))
                               transducer)
-                     (const #t) read-line port))
+                     (const #t) get-line port))
    "git" "diff" "--stat" "--name-status"
    (string-append start-commit ".." end-commit)))
 
@@ -207,7 +206,7 @@ there is no such commit."
    (lambda (port)
      (port-transduce (tmap identity)
                      rlast
-                     read-line
+                     get-line
                      port))
    "git" "log" "--format=format:%H" "--since" since))
 
-- 
cgit v1.2.3