[config.git] / djavu-asus / emacs / elpa / jabber-20230715.456 / jabber-browse.elc

;ELC\1c\0\0\0
;;; Compiled
;;; in Emacs version 28.2
;;; with all optimizations.


(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307B\"\207" [require jabber-iq jabber-xml jabber-util add-to-list jabber-jid-info-menu "Send browse query" jabber-get-browse] 4)
#@87 Send a browse infoquery request to someone.

JC is the Jabber connection.

(fn JC TO)\1f
(defalias 'jabber-get-browse #[514 "\300\ 2\ 2\301\302\303\304\303\305&\b\207" [jabber-send-iq "get" (query ((xmlns . "jabber:iq:browse"))) jabber-process-data jabber-process-browse "Browse failed"] 11 (#$ . 277) (byte-code "\300 \301\302\303\211\211\211\304&\ 6D\207" [jabber-read-account jabber-read-jid-completing "browse: " nil t] 8)])
#@189 Handle results from jabber:iq:browse requests.

JC is the Jabber connection.
XML-DATA is the parsed tree data from the stream (stanzas)
obtained from `xml-parse-region'.

(fn JC XML-DATA)\1f
(defalias 'jabber-process-browse #[514 "\211\211AA\211\300\232?\205\f\0\211\266\202\211\205\203\ 1\211@\211<\203|\ 1\211\211<\205!\0\211@\262\ 1\301=\204|\ 1\211\302\ 1:\2053\0\303\ 2\ 2\"\266\202`\ 2\211<\205>\0\211@\262\ 1\304=\204W\0\ 2\305\ 1:\205P\0\303\ 2\ 2\"\266\202\306\230\203c\0\307\310\311\312#\313\261\ 2\210\202\352\0\ 2\211<\205k\0\211@\262\ 1\314=\204\204\0\ 2\305\ 1:\205}\0\303\ 2\ 2\"\266\202\315\230\203\220\0\307\316\311\312#\313\261\ 2\210\202\352\0\ 2\211<\205\230\0\211@\262\ 1\317=\204\261\0\ 2\305\ 1:\205\252\0\303\ 2\ 2\"\266\202\320\230\203\275\0\307\321\311\312#\313\261\ 2\210\202\352\0\ 2\305\ 1:\205\310\0\303\ 2\ 2\"\266\202\211G\322U\203\335\0\ 3\211<\205\331\0\211@\262\ 1\262\ 1\307\323\324\ 3\"\311\312#\313\261\ 2\266\ 2\325\211\203\15\ 1\211@\ 4\ 1@\ 1:\205\375\0\303\ 2\ 2\"\266\202\211G\322V\203\r\ 1\ 1A\ 1\326\261\ 3\210\210\ 1A\266\202\202\353\0\210\327\ 3\301\"\211\203N\ 1\211@\211\211AA\211\300\232?\205,\ 1\211\266\202@;\203G\ 1\330\ 1\211AA\211\300\232?\205@\ 1\211\266\202@\326\261\ 3\210\ 1A\266\202\202\1a\ 1\210\326c\210\331\ 1`\332\ 5$\210\331\ 1`\333\ 6	$\210\ 2\211AA\211\300\232?\205m\ 1\211\266\202@<\203z\ 1\334\ 6\ 6\ 4\"\210\266\ 2\ 1A\266\202\202\ e\0\207" [(("")) ns jid xml-get-attribute-or-nil user category "user" jabber-propertize "$ USER" face jabber-title-medium "\n\n" service "service" "* SERVICE" conference "conference" "@ CONFERENCE" 0 format "! OTHER: %s" ((type . "Type:		") (jid . "JID:		") (name . "Name:		") (version . "Version:	")) "\n" jabber-xml-get-children "Namespace:	" put-text-property jabber-jid jabber-account jabber-process-browse] 13 (#$ . 703)])
(provide 'jabber-browse)
Commit	Line	Data
53e6db90 DC	1	;ELC\1c\0\0\0
	2	;;; Compiled
	3	;;; in Emacs version 28.2
	4	;;; with all optimizations.
	5
	6
	7
	8	(byte-code "\300\301!\210\300\302!\210\300\303!\210\304\305\306\307B\"\207" [require jabber-iq jabber-xml jabber-util add-to-list jabber-jid-info-menu "Send browse query" jabber-get-browse] 4)
	9	#@87 Send a browse infoquery request to someone.
	10
	11	JC is the Jabber connection.
	12
	13	(fn JC TO)\1f
	14	(defalias 'jabber-get-browse #[514 "\300\ 2\ 2\301\302\303\304\303\305&\b\207" [jabber-send-iq "get" (query ((xmlns . "jabber:iq:browse"))) jabber-process-data jabber-process-browse "Browse failed"] 11 (#$ . 277) (byte-code "\300 \301\302\303\211\211\211\304&\ 6D\207" [jabber-read-account jabber-read-jid-completing "browse: " nil t] 8)])
	15	#@189 Handle results from jabber:iq:browse requests.
	16
	17	JC is the Jabber connection.
	18	XML-DATA is the parsed tree data from the stream (stanzas)
	19	obtained from `xml-parse-region'.
	20
	21	(fn JC XML-DATA)\1f
	22	(defalias 'jabber-process-browse #[514 "\211\211AA\211\300\232?\205\f\0\211\266\202\211\205\203\ 1\211@\211<\203\|\ 1\211\211<\205!\0\211@\262\ 1\301=\204\|\ 1\211\302\ 1:\2053\0\303\ 2\ 2\"\266\202`\ 2\211<\205>\0\211@\262\ 1\304=\204W\0\ 2\305\ 1:\205P\0\303\ 2\ 2\"\266\202\306\230\203c\0\307\310\311\312#\313\261\ 2\210\202\352\0\ 2\211<\205k\0\211@\262\ 1\314=\204\204\0\ 2\305\ 1:\205}\0\303\ 2\ 2\"\266\202\315\230\203\220\0\307\316\311\312#\313\261\ 2\210\202\352\0\ 2\211<\205\230\0\211@\262\ 1\317=\204\261\0\ 2\305\ 1:\205\252\0\303\ 2\ 2\"\266\202\320\230\203\275\0\307\321\311\312#\313\261\ 2\210\202\352\0\ 2\305\ 1:\205\310\0\303\ 2\ 2\"\266\202\211G\322U\203\335\0\ 3\211<\205\331\0\211@\262\ 1\262\ 1\307\323\324\ 3\"\311\312#\313\261\ 2\266\ 2\325\211\203\15\ 1\211@\ 4\ 1@\ 1:\205\375\0\303\ 2\ 2\"\266\202\211G\322V\203\r\ 1\ 1A\ 1\326\261\ 3\210\210\ 1A\266\202\202\353\0\210\327\ 3\301\"\211\203N\ 1\211@\211\211AA\211\300\232?\205,\ 1\211\266\202@;\203G\ 1\330\ 1\211AA\211\300\232?\205@\ 1\211\266\202@\326\261\ 3\210\ 1A\266\202\202\1a\ 1\210\326c\210\331\ 1`\332\ 5$\210\331\ 1`\333\ 6 $\210\ 2\211AA\211\300\232?\205m\ 1\211\266\202@<\203z\ 1\334\ 6\ 6\ 4\"\210\266\ 2\ 1A\266\202\202\ e\0\207" [(("")) ns jid xml-get-attribute-or-nil user category "user" jabber-propertize "$ USER" face jabber-title-medium "\n\n" service "service" "* SERVICE" conference "conference" "@ CONFERENCE" 0 format "! OTHER: %s" ((type . "Type: ") (jid . "JID: ") (name . "Name: ") (version . "Version: ")) "\n" jabber-xml-get-children "Namespace: " put-text-property jabber-jid jabber-account jabber-process-browse] 13 (#$ . 703)])
	23	(provide 'jabber-browse)