 (defn -main
   "Start the demo ..."
   [& args]
-  (command-repl))
+  (do
+    (command-repl)
+    (storage/save-data ((todolist :plain)))
+    ))
 

        ;
        (= cmd "note")
        ((current-todo :note-add) joined-args)
        ;
        ; manipulation
        ;

  (:require [todos.todo-item :as t-item])
  (:require [todos.storage :as storage])
  (:require [clojure.string :as stri]))

(def todolist
  (t-item/todo-load-from-plain
