[elpa] externals/greader 7a414f2 73/76: more work on backend completion

[Stefan Monnier]

branch: externals/greader
commit 7a414f2570585da927fb2178da0ddc439a828771
Author: Michelangelo Rodriguez <address@hidden>
Commit: Michelangelo Rodriguez <address@hidden>

    more work on backend completion
---
 greader.el | 6 +++---
 1 file changed, 3 insertions(+), 3 deletions(-)

diff --git a/greader.el b/greader.el
index 8ca8e97..d425898 100644
--- a/greader.el
+++ b/greader.el
@@ -205,7 +205,7 @@ For example, if you specify a function that gets a 
sentence, you should specify
   (interactive
    (list
     (if current-prefix-arg
-(completing-read"back-end:" (greader--get-backends)))))
+       (completing-read"back-end:" (greader--get-backends)))))
   (if (functionp backend)
       (if (memq backend greader-backends)
          (setq greader-actual-backend backend)
@@ -354,13 +354,13 @@ For example, if you specify a function that gets a 
sentence, you should specify
 (defun greader-set-reading-keymap ()
   (if (assoc 'greader-mode minor-mode-map-alist)
       (progn
-       (setq minor-mode-map-alist (assq-delete-all 'greader 
minor-mode-map-alist))
+       (setq minor-mode-map-alist (assq-delete-all 'greader-mode 
minor-mode-map-alist))
        (setq minor-mode-map-alist (push `(greader-mode . ,greader-reading-map) 
minor-mode-map-alist)))))
 
 (defun greader-set-greader-keymap ()
   (if (assoc 'greader-mode minor-mode-map-alist)
       (progn
-       (setq minor-mode-map-alist (assq-delete-all 'greader 
minor-mode-map-alist))
+       (setq minor-mode-map-alist (assq-delete-all 'greader-mode 
minor-mode-map-alist))
        (setq minor-mode-map-alist (push `(greader-mode . ,greader-map) 
minor-mode-map-alist)))))
 
 (defun greader-stop ()