From 08a2b3c8dd4a624407b4d20368d2a3467426c7fd Mon Sep 17 00:00:00 2001
From: Tom Willemsen
Date: Fri, 3 Aug 2012 23:54:35 +0200
Subject: Add avandu-tt-rss-api-level command

This command gets the api level from tt-rss, this doesn't serve any
purpose yet, but it could be used later-on to determine which features
are and aren't available.
---
 avandu.el | 12 ++++++++++++
 1 file changed, 12 insertions(+)

(limited to 'avandu.el')

diff --git a/avandu.el b/avandu.el
index a343c64..570673b 100644
--- a/avandu.el
+++ b/avandu.el
@@ -397,6 +397,18 @@ feeds."
   (interactive)
   (avandu--next-button-of-type backward feed))
 
+(defun avandu-tt-rss-api-level ()
+  "Get the API level of the your Tiny Tiny RSS instance."
+  (interactive)
+  (let ((level (cdr (assq 'level
+                          (assq 'content
+                                (avandu--send-command
+                                 '((op . "getApiLevel"))))))))
+    (when (called-interactively-p 'any)
+      (message "API Level: %d" level))
+
+    level))
+
 ;; Overview
 (define-derived-mode avandu-overview-mode special-mode "Avandu:Overview"
   "Major mode fo the avandu overview screen.
-- 
cgit v1.2.3-54-g00ecf