diff options
| -rw-r--r-- | undone/main.scm | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/undone/main.scm b/undone/main.scm index 37aa0f7..863e6bb 100644 --- a/undone/main.scm +++ b/undone/main.scm @@ -125,7 +125,7 @@ (append todo-list (list (append - `((content . ,(read-delimited ""))) + `((content . ,(string-trim-right (read-delimited "")))) (map (lambda (arg) (let* ((pair (string-split arg #\=)) (var (string->symbol (car pair))) @@ -139,7 +139,7 @@ (define-view default "Default todo-list view, show only the title." - "~a" content) + "~a~%" content) (define (view args) "Show a list of todo items." |