Show selectors by prefixing '>' and indent info items - holymoly - A tor enable… | |
git clone git://vernunftzentrum.de/holymoly.git | |
Log | |
Files | |
Refs | |
README | |
LICENSE | |
--- | |
commit a9e195abdd717071b6f6683e691872bb09d322f9 | |
parent 107a9ac649dfaecc2d65d6ac3386faedd554dbcd | |
Author: Christian Kellermann <[email protected]> | |
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(-) | |
--- | |
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)))) |