    (cons 'vertical-scroll-bars nil))
   "Base frame parameters.")
 
-(cl-defstruct
-    danny-destination-root
-  name
-  dpath
-  recursive)
-
 (defun danny-stop-monitoring ()
   (interactive)
   "Stop monitoring for new files."


(defun danny--read-history-hashtable (hash-fpath)
  "Read history hash in HASH-FPATH."
  (if (not (f-exists? hash-fpnath))
      (ht-create)
    (with-temp-buffer
      (insert-file-contents hash-fpath)

                                                    (danny--handle-file-created fpath))))
                                   :unwind (lambda ()
                                             (delete-frame)
                                             (kill-buffer "*danny*")
                                             (other-window 1))))))

(defun danny--handle-file-created (file-path)
