   (let ((name-num-map (make-hash-table :test #'equal))
         evernote-note-cands
         evernote-note-display-map
-        evernote-note-completion-prompt)
+        evernote-minibuffer-note-completion-prompt)
     (mapc (lambda (attr)
             (let* ((name (cdr (assoc 'name attr)))
                    displayed-name

(define-key evernote-mode-map "\C-cer"   'evernote-rename-note)
(define-key evernote-mode-map "\C-ced"   'evernote-delete-note)

(defvar evernote-read-note-name-map
  (copy-keymap minibuffer-local-completion-map))

(define-key evernote-read-note-name-map [tab] 'evernote-note-completion)
(define-key evernote-read-note-name-map "\C-i" 'evernote-note-completion)


;;(defvar evernote-browsing-mode-map (copy-keymap global-map)

;; Evernote mode
;;

(defun evernote-search-mode ()
  "Major mode for selecting a note."
  (interactive)
  (use-local-map evernote-search-mode-map)
  (setq buffer-read-only t
        truncate-lines t
        major-mode 'evernote-search-mode
        mode-name "Evernote-Search")
  (goto-char (point-min)))

;;
;; Evernote mode
;;

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