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."