iMake malformed lines less prominent, make them not a link - holymoly - A tor enabled gopher client written in CHICKEN scheme	Err	vernunftzentrum.de	70
hgit clone git://vernunftzentrum.de/holymoly.git	URL:git://vernunftzentrum.de/holymoly.git	vernunftzentrum.de	70
1Log	/ckeen/repos/holymoly/log.gph	vernunftzentrum.de	70
1Files	/ckeen/repos/holymoly/files.gph	vernunftzentrum.de	70
1Refs	/ckeen/repos/holymoly/refs.gph	vernunftzentrum.de	70
1README	/ckeen/repos/holymoly/file/README.gph	vernunftzentrum.de	70
1LICENSE	/ckeen/repos/holymoly/file/LICENSE.gph	vernunftzentrum.de	70
i---	Err	vernunftzentrum.de	70
1commit 2846889ec0da55f718c2eb87f972af801fe50c37	/ckeen/repos/holymoly/commit/2846889ec0da55f718c2eb87f972af801fe50c37.gph	vernunftzentrum.de	70
1parent db9345443c5ab1542db7760a71503d69e160ab0b	/ckeen/repos/holymoly/commit/db9345443c5ab1542db7760a71503d69e160ab0b.gph	vernunftzentrum.de	70
hAuthor: Christian Kellermann <ckeen@pestilenz.org>	URL:mailto:ckeen@pestilenz.org	vernunftzentrum.de	70
iDate:   Fri,  3 Aug 2018 09:48:21 +0200	Err	vernunftzentrum.de	70
i	Err	vernunftzentrum.de	70
iMake malformed lines less prominent, make them not a link	Err	vernunftzentrum.de	70
i	Err	vernunftzentrum.de	70
iDiffstat:	Err	vernunftzentrum.de	70
i  holymoly.scm                        |       8 +++++---	Err	vernunftzentrum.de	70
i	Err	vernunftzentrum.de	70
i1 file changed, 5 insertions(+), 3 deletions(-)	Err	vernunftzentrum.de	70
i---	Err	vernunftzentrum.de	70
1diff --git a/holymoly.scm b/holymoly.scm	/ckeen/repos/holymoly/file/holymoly.scm.gph	vernunftzentrum.de	70
i@@ -224,14 +224,14 @@	Err	vernunftzentrum.de	70
i           (port (string->number (fourth s)))	Err	vernunftzentrum.de	70
i           (rest (cdddr s)))	Err	vernunftzentrum.de	70
i      (make-entry type title selector host port rest))	Err	vernunftzentrum.de	70
i-   (e () (make-entry 'error "Malformed entry, please ignore" "" "" "" '()))))	Err	vernunftzentrum.de	70
i+   (e () (make-entry 'error "..." "" "" "" '()))))	Err	vernunftzentrum.de	70
i 	Err	vernunftzentrum.de	70
i (define (render-entry e)	Err	vernunftzentrum.de	70
i   (match (entry-type e)	Err	vernunftzentrum.de	70
i     ('info	Err	vernunftzentrum.de	70
i      (sprintf "   ~a" (entry-title e)))	Err	vernunftzentrum.de	70
i     ('error	Err	vernunftzentrum.de	70
i-     (sprintf "[ERROR]:\t~a" (entry-title e)))	Err	vernunftzentrum.de	70
i+     (sprintf " ! ~a" (entry-title e)))	Err	vernunftzentrum.de	70
i     (else	Err	vernunftzentrum.de	70
i      (sprintf " > ~a" (entry-title e)))))	Err	vernunftzentrum.de	70
i 	Err	vernunftzentrum.de	70
i@@ -261,7 +261,9 @@	Err	vernunftzentrum.de	70
i 	Err	vernunftzentrum.de	70
i (define (render-directory strs)	Err	vernunftzentrum.de	70
i   (let* ((p (map string->entry strs))	Err	vernunftzentrum.de	70
i-        (links (get-indices p (lambda (e) (not (equal? (entry-type e) 'info))))))	Err	vernunftzentrum.de	70
i+        (links (get-indices p (lambda (e)	Err	vernunftzentrum.de	70
i+                                (not (or (equal? (entry-type e) 'info)	Err	vernunftzentrum.de	70
i+                                                 (equal? (entry-type e) 'error)))))))	Err	vernunftzentrum.de	70
i     (pager p win: (main-win) renderer: render-entry use-cursor: (not (null? links)) selectables: links)))	Err	vernunftzentrum.de	70
i 	Err	vernunftzentrum.de	70
i (define type-handlers	Err	vernunftzentrum.de	70
.