Show selectors by prefixing '>' and indent info items - holymoly - A tor enabled gopher client written in CHICKEN scheme
 (HTM) git clone git://vernunftzentrum.de/holymoly.git
 (DIR) Log
 (DIR) Files
 (DIR) Refs
 (DIR) README
 (DIR) LICENSE
       ---
 (DIR) commit a9e195abdd717071b6f6683e691872bb09d322f9
 (DIR) parent 107a9ac649dfaecc2d65d6ac3386faedd554dbcd
 (HTM) Author: Christian Kellermann <ckeen@pestilenz.org>
       Date:   Wed,  7 Mar 2018 22:25:00 +0100
       
       Show selectors by prefixing '>' and indent info items
       
       Diffstat:
         holymoly.scm                        |       4 ++--
       
       1 file changed, 2 insertions(+), 2 deletions(-)
       ---
 (DIR) diff --git a/holymoly.scm b/holymoly.scm
       @@ -194,11 +194,11 @@
        (define (render-entry e)
          (match (entry-type e)
            ('info
       -     (sprintf "~a" (entry-title e)))
       +     (sprintf "   ~a" (entry-title e)))
            ('error
             (sprintf "[ERROR]:\t~a" (entry-title e)))
            (else
       -     (sprintf "\t~a" (entry-title e)))))
       +     (sprintf " > ~a" (entry-title e)))))
        
        (define (call prog r)
          (with-output-to-pipe prog (lambda () (display r))))