X-Git-Url: https://thelambdalab.xyz/gitweb/index.cgi?a=blobdiff_plain;f=elpher.el;h=7add7209d30cba817195a6853b6db714dc9b480f;hb=184e0cf3c219e7e0266e19e26eb81b39f548df98;hp=12ef1c850d28a9cdb32d6a925948e6d1d4787b9e;hpb=1892efc93a3ba9b4381f24adf9ae994949e3250b;p=elpher.git

diff --git a/elpher.el b/elpher.el
index 12ef1c8..7add720 100644
--- a/elpher.el
+++ b/elpher.el
@@ -292,7 +292,7 @@ content and cursor position fields of the node."
 
 (defun elpher-insert-index (string)
   "Insert the index corresponding to STRING into the current buffer."
-  (dolist (line (split-string string "\r\n"))
+  (dolist (line (split-string (replace-regexp-in-string "\r" "" string) "\n"))
     (unless (= (length line) 0)
       (elpher-insert-index-record line))))
 
@@ -680,7 +680,7 @@ The result is stored as a string in the variable ‘elpher-selector-string’."
   (let* ((link-map (elpher-build-link-map)))
     (if link-map
         (let ((key (let ((completion-ignore-case t))
-                     (completing-read "Menu item: " link-map nil t))))
+                     (completing-read "Directory entry/link (tab to autocomplete): " link-map nil t))))
           (if (and key (> (length key) 0))
               (let ((b (cdr (assoc key link-map))))
                 (goto-char (button-start b))