Add avandu-feeds command
This command only returns a vector of feeds, it is not yet useful for users but will be used later to allow for different views of feeds.
This commit is contained in:
parent
ea83dd8c2c
commit
fb8e52c1dc
2 changed files with 35 additions and 2 deletions
22
avandu.el
22
avandu.el
|
@ -326,6 +326,26 @@ returned json."
|
||||||
(feed_id . ,id))))
|
(feed_id . ,id))))
|
||||||
(revert-buffer))
|
(revert-buffer))
|
||||||
|
|
||||||
|
(defun avandu-feeds (&optional category unread limit offset)
|
||||||
|
"Get the subscribed feeds. If CATEGORY has been specified show
|
||||||
|
only the feeds in CATEGORY. If UNREAD has been specified only
|
||||||
|
show feeds with unread articles in them. Only fets LIMIT
|
||||||
|
number of feeds, starting from OFFSET.
|
||||||
|
|
||||||
|
There are a number of special category IDs:
|
||||||
|
0 -- Uncategorized feeds
|
||||||
|
-1 -- Special (e.g. Starred, Published, Archived, etc.) feeds
|
||||||
|
-2 -- Labels
|
||||||
|
-3 -- All feeds, excluding virtual feeds (e.g. Labels and such)
|
||||||
|
-4 -- All feeds, including virtual feeds"
|
||||||
|
(cdr (assq 'content
|
||||||
|
(avandu--send-command
|
||||||
|
`((op . "getFeeds")
|
||||||
|
,@(when category `((cat_id . ,category)))
|
||||||
|
,@(when unread `((unread_only . ,unread)))
|
||||||
|
,@(when limit `((limit . ,limit)))
|
||||||
|
,@(when offset `((offset . ,offset))))))))
|
||||||
|
|
||||||
(defun avandu-logged-in-p ()
|
(defun avandu-logged-in-p ()
|
||||||
"Send a request to tt-rss to see if we're (still) logged
|
"Send a request to tt-rss to see if we're (still) logged
|
||||||
in. This function returns t if we are, or nil if we're not."
|
in. This function returns t if we are, or nil if we're not."
|
||||||
|
@ -500,8 +520,6 @@ by feed."
|
||||||
;; (id . 109))
|
;; (id . 109))
|
||||||
|
|
||||||
;; (login user password)
|
;; (login user password)
|
||||||
;; (get-counters output-mode)
|
|
||||||
;; (get-feeds category-id unread-only limit offset)
|
|
||||||
;; (get-categories unread-only)
|
;; (get-categories unread-only)
|
||||||
;; (get-headlines feed-id limit skip filter categoryp show-excerpt show-content view-mode include-attachments since-id search search-mode match-on)
|
;; (get-headlines feed-id limit skip filter categoryp show-excerpt show-content view-mode include-attachments since-id search search-mode match-on)
|
||||||
;; (update-article article-ids mode field data)
|
;; (update-article article-ids mode field data)
|
||||||
|
|
|
@ -273,3 +273,18 @@ Tiny Tiny RSS Version: #
|
||||||
|
|
||||||
and it returns the version as a string.
|
and it returns the version as a string.
|
||||||
@end deffn
|
@end deffn
|
||||||
|
|
||||||
|
@deffn avandu-feeds &optional category unread limit offset
|
||||||
|
Get a list of all the feeds in CATEGORY. If CATEGORY is @code{nil},
|
||||||
|
unspicified or 0, show uncategorized feeds.
|
||||||
|
|
||||||
|
If UNREAD is non-@code{nil} only get feeds with unread articles in
|
||||||
|
them.
|
||||||
|
|
||||||
|
If LIMIT is non-@code{nil} only get LIMIT number of feeds and if
|
||||||
|
OFFSET is non-@code{nil} start at OFFSET.
|
||||||
|
|
||||||
|
Returns a vector of all the feeds. This is not useful for users on
|
||||||
|
its own, but if will be used in the future to make more views
|
||||||
|
available.
|
||||||
|
@end deffn
|
||||||
|
|
Loading…
Reference in a new issue