 
 (defn save-document [app]
   (om/update! app :last-saved (js/Date.))
+  (om/update! app :last-title (:title @app))
   (p/set-document (:title @app) (:input @app))
   (om/update! app :titles (p/get-all-titles)))
 

     :titles []
     :title ""
     :last-saved nil
     :channel (chan)}))

;; Title field

      (dom/div #js {:id "title-field"}
        (dom/input #js {:type "text"
                        :onChange #(handle-title-change % app)
                        :onBlur #(handle-title-blur % app)
                        :value (:title app)})))))

;; Left menu
