 (require 'ht)
 (require 'ivy)
 
-(defvar danny-monitor-dir-path nil "Directory path to monitor.")
+(defvar danny-monitor-dir-path "~/Downloads" "Directory path to monitor.")
 
 (cl-defstruct
     danny-destination-root

                                                 (-concat (list (cons "Open" (lambda ()
                                                                               (unless (f-exists-p fpath)
                                                                                 (error "File not found: %s" fpath))
                                                                               (find-file fpath)))
                                                                (cons "Move..." (lambda ()
                                                                                  (danny--handle-file-created fpath))))
                                                          (-map
                                                           (lambda (destination)
                                                             (cons (format "Move to %s" destination)

                   (-concat danny--base-frame-params
                            (list (cons 'height (length lines))
                                  (cons 'width (+ 1 width (danny--longest-line-length lines))))))))
      (setq input (read-string prompt default))
      (delete-frame)
      (other-window 1)
      (kill-buffer "*danny*")
