;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. (byte-code "\300\301!\210\300\302!\210\300\303!\207" [require sx-method sx-cache sx-filter] 2) #@28 Filter for browsing sites. (defconst sx-site-browse-filter '((site\.site_type site\.name site\.api_site_parameter site\.site_url site\.related_sites related_site\.api_site_parameter related_site\.relation \.backoff \.error_id \.error_message \.error_name \.has_more \.items \.page \.page_size \.quota_max \.quota_remaining) nil nil) (#$ . 182)) #@48 Return all sites with `sx-site-browse-filter'. (defalias 'sx-site--get-site-list #[0 "\300\301\302\"\207" [sx-cache-get site-list (sx-method-call 'sites :pagesize 999 :filter sx-site-browse-filter)] 3 (#$ . 533)]) (byte-code "\300\301\302\303\304DD\305\306\307%\207" [custom-declare-variable sx-site-favorites funcall function #[0 "\300\207" [nil] 1] "List of favorite sites.\nEach entry is a string corresponding to a single site's\napi_site_parameter." :group sx] 6) #@41 Return a list of all known site tokens. (defalias 'sx-site-get-api-tokens #[0 "\300\301\302 \"\207" [mapcar #[257 "\300\236A\207" [api_site_parameter] 3 "\n\n(fn SITE)"] sx-site--get-site-list] 3 (#$ . 1008)]) (provide 'sx-site)