;ELC
;;; Compiled
;;; in Emacs version 28.0.50
;;; with all optimizations.
#@107 Subscribe to gmail notifications.
See http://code.google.com/apis/talk/jep_extensions/usersettings.html#4
(defalias 'jabber-gmail-subscribe #[(jc) "\301\302!\303\304\305\306\307\306&\210\310!\207" [jc jabber-send-iq jabber-connection-bare-jid "set" (usersetting ((xmlns . "google:setting")) (mailnotifications ((value . "true")))) jabber-report-success "Gmail subscription" jabber-process-data jabber-gmail-query] 9 (#$ . 88) (list (jabber-read-account))])
(byte-code "\300\301\302\303B\"\207" [add-to-list jabber-iq-set-xmlns-alist "google:mail:notify" jabber-gmail-process-new-mail] 4)
#@110 Process new gmail notification.
See http://code.google.com/apis/talk/jep_extensions/gmail.html#notifications
(defalias 'jabber-gmail-process-new-mail #[(jc xml-sexp) "\304\211:\205
\306\n \"*\303\211:\205 \306\n \"* \307
\f\310\311\211\211\211\211 & \210*\312
!\207" [xml-sexp attribute node id from jc xml-get-attribute-or-nil jabber-send-iq "result" nil jabber-gmail-query] 11 (#$ . 687)])
#@154 Request mail information from the Google Talk server (a.k.a. one shot query).
See http://code.google.com/apis/talk/jep_extensions/gmail.html#requestmail
(defalias 'jabber-gmail-query #[(jc) "\301\302!\303\304\305\306\307\310\311& \207" [jc jabber-send-iq jabber-connection-bare-jid "get" (query ((xmlns . "google:mail:notify"))) jabber-gmail-process-mailbox nil jabber-process-data "Gmail query" "gmail-query"] 10 (#$ . 1095) (list (jabber-read-account))])
#@103 Process gmail query response.
See http://code.google.com/apis/talk/jep_extensions/gmail.html#response
(defalias 'jabber-gmail-process-mailbox #[(jc xml-sexp &rest ignore) "\304\305\"@\211AA\211\306\232?\205 \n*\211\205 \307 !)\207" [xml-sexp node children ts jabber-xml-get-children mailbox (("")) jabber-gmail-dothreads] 4 (#$ . 1561)])
#@190 Process elements.
THREADS is a list of XML sexps, corresponding to elements.
See http://code.google.com/apis/talk/jep_extensions/gmail.html#response
(defalias 'jabber-gmail-dothreads #[(threads) "\301\302G\"\207" [threads message "%d new messages in gmail inbox"] 3 (#$ . 1912)])
(provide 'jabber-gmail)