    (lambda ()
      (evernote-command-create-search
       (read-string "Saved Search Name:")
-      (read-string "Query:")))))
+      (read-string "Query:"))
+     t)))
 
 
 (defun evernote-edit-search ()

;;

(defun evernote-mode-after-save-hook ()
  (setq evernote-mode nil
        evernote-note-guid nil
        evernote-note-name nil
        evernote-note-tags nil
        evernote-note-edit-mode nil
        vc-mode nil)
  (remove-hook 'after-save-hook 'evernote-mode-after-save-hook))


(defun evernote-mode ()
  "Toggle Evernote mode, a minor mode for using evernote functions."
  (interactive)
  (or (assq 'evernote-mode minor-mode-alist)

            search-alist
            nil t)
           search-alist))))
      t)
     t)))


(defun evernote-open-note-common (note-command-output &optional display-completion)
