[elpa] externals/greader 6177afd174 2/3: Merge branch 'experimental'

[ELPA Syncer]

branch: externals/greader
commit 6177afd174db7f2ca1538c0bf3f79fcdab96256e
Merge: ae6e7524b9 0d34f66a9c
Author: Michelangelo Rodriguez <michelangelo.rodriguez@gmail.com>
Commit: Michelangelo Rodriguez <michelangelo.rodriguez@gmail.com>

    Merge branch 'experimental'
---
 greader.el | 12 ++++++------
 1 file changed, 6 insertions(+), 6 deletions(-)

diff --git a/greader.el b/greader.el
index dd9b177e11..8b71376317 100644
--- a/greader.el
+++ b/greader.el
@@ -262,7 +262,7 @@ backends."
        (completing-read"back-end:" (greader--get-backends)))))
   (if (functionp backend)
       (if (memq backend greader-backends)
-         (setq-local greader-actual-backend backend)
+         (setq-local greader-current-backend backend)
        (error "%s" "The function you have specified is not a greader's 
back-end.")))
   (if (stringp backend)
       (progn
@@ -273,17 +273,17 @@ backends."
                 (get elem 'greader-backend-name) backend)
                (setq result elem)))
          (if result
-             (setq-local greader-actual-backend result)
+             (setq-local greader-current-backend result)
            (error "%s" "the function name you have specified is not a 
greader's back-end.")))))
   (if (not backend)
       (let
-         ((index (seq-position greader-backends greader-actual-backend))
+         ((index (seq-position greader-backends greader-current-backend))
           (len (length greader-backends)))
        (if
            (= (+ index 1) len)
-           (setq-local greader-actual-backend (elt greader-backends 0))
-         (setq-local greader-actual-backend (elt greader-backends (+ index 
1))))))
-  (message "Actual back-end is %s." (get greader-actual-backend 
'greader-backend-name)))
+           (setq-local greader-current-backend (elt greader-backends 0))
+         (setq-local greader-current-backend (elt greader-backends (+ index 
1))))))
+  (message "Current back-end is %s." (get greader-current-backend 
'greader-backend-name)))
 
 (defun greader-load-backends ()
   "Load backends taken from `greader-backends'."