 
 (provide 'evernote-mode)
 
-;;(setq debug-on-error t)
-
+;;(setq debug-on-error nil)
+

          note-list)
    (setq evernote-note-cands (nreverse evernote-note-cands)
          evernote-note-display-map (nreverse evernote-note-display-map))
    (setq evernote-note-completion-prompt "Note:")
    (cdr (assoc (read-from-minibuffer evernote-note-completion-prompt
                                      nil evernote-read-note-name-map)
                evernote-note-cands))))

;;    (setq evernote-note-cands

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