    "\""))
 
 
+(defun evernote-assoc-cdr (key alist)
+  (cdr (assoc key alist)))
+
+
+(defun evernote-get-current-line-string ()
+  (save-excursion
+    (buffer-substring
+     (progn
+       (beginning-of-line)
+       (point))
+     (progn
+       (end-of-line)
+       (point)))))
+
+
+(defun evernote-get-minibuffer-string ()
+  (save-excursion
+    (evernote-set-buffer-to-minibuffer)
+    (buffer-substring
+     (progn
+       (goto-char (+ 1 (minibuffer-prompt-width)))
+       (point))
+     (progn
+       (end-of-line)
+       (point)))))
+
+
+(defun evernote-set-minibuffer-string (str)
+  (save-excursion
+    (evernote-set-buffer-to-minibuffer)
+    (delete-region
+     (progn
+       (goto-char (+ 1 (minibuffer-prompt-width)))
+       (point))
+     (progn
+       (end-of-line)
+       (point)))
+    (insert str)))
+
+
+(defun evernote-set-buffer-to-minibuffer ()
+  (set-buffer (window-buffer (active-minibuffer-window))))
+
+
+(defun evernote-minibuffer-tmp-message (msg)
+  (save-excursion
+    (goto-char (point-max))
+    (save-excursion (insert " " msg))
+    (sit-for 1)
+    (delete-region (point) (point-max))))
+
+
 (defun evernote-update-mode-line ()
   "Update mode line"
   (setq vc-mode

      (pop-to-buffer buf))))


(defun evernote-string-to-oct (string)
  "Convert the string into quoted backslashed octal edit mode."
  (concat

  (force-mode-line-update))


(defun evernote-completing-read-multiple
  (prompt table &optional predicate require-match initial-input hist def inherit-input-method)
  "Read multiple strings with completion. and return nil if no input is given"
  (let (results)
    (setq results
          (completing-read-multiple prompt
                                    table
                                    predicate
                                    require-match
                                    initial-input
                                    hist
                                    def
                                    inherit-input-method))
    (delete "" results)))


;;
