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

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


#@89 Color specification as needed by the wmii window manager for the jabber alert messages.\1f
(defvar jabber-wmii-color "#ffffff #335577 #447799" (#$ . 84))
#@112 If non-nil time to reset wmii message.  If nil the message has to be cleared by other means, i.e. from wmiirc.\1f
(defvar jabber-wmii-reset-time "20 sec" (#$ . 242))
#@30 Timer to clear wmii message.\1f
(defvar jabber-wmii-timer nil (#$ . 411))
#@64 Clear any previous message output through wmii window manager.\1f
(defalias 'jabber-wmii-clear #[0 "\3001\ f\0\301\302\303\211\211\304\305&\ 60\207\303\207" [(error) call-process "wmiir" nil "remove" "/rbar/jabber"] 7 (#$ . 488)])
#@46 Show MSG in wmii.

(fn TEXT &optional TITLE)\1f
(defalias 'jabber-wmii-message #[513 "\b\203\b\0\304\b!\210\305	!\306\307\310\"\311\312\ 2\"\216r\211q\210\n\313\ 4\206\1f\0\ 5\261\ 3\210)r\211q\210\314\315\211\ 4\315\316%\210*\210\3171C\0\320\321\ 2\315\211\322\323&\ 60\210\202F\0\315\266\ 2\324\ 1!\266\ 2\v\205V\0\325\v\315\326#\211\10\207" [jabber-wmii-timer temporary-file-directory jabber-wmii-color jabber-wmii-reset-time cancel-timer make-temp-file generate-new-buffer " *temp file*" t make-closure #[0 "\301\300!\205	\0\302\300!\207" [V0 buffer-name kill-buffer] 2] " " write-region nil 0 (error) call-process "wmiir" "create" "/rbar/jabber" delete-file run-at-time jabber-wmii-clear] 10 (#$ . 717)])
#@78 Show a message through the wmii window manager.

(fn FROM BUFFER TEXT TITLE)\1f
(defalias 'jabber-message-wmii #[1028 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-wmii-message] 7 (#$ . 1395)])
(byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\207" [put jabber-alert-message-hooks custom-options jabber-message-wmii] 6)
#@84 Show a message through the wmii window manager.

(fn NICK GROUP BUFFER TEXT TITLE)\1f
(defalias 'jabber-muc-wmii #[1285 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-wmii-message] 8 (#$ . 1723)])
(byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\207" [put jabber-alert-muc-hooks custom-options jabber-muc-wmii] 6)
#@96 Show a message through the wmii window manager.

(fn WHO OLDSTATUS NEWSTATUS STATUSTEXT TITLE)\1f
(defalias 'jabber-presence-wmii #[1285 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-wmii-message] 8 (#$ . 2045)])
(byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\207" [put jabber-alert-presence-hooks custom-options jabber-presence-wmii] 6)
#@76 Show a message through the wmii window manager.

(fn INFOTYPE BUFFER TEXT)\1f
(defalias 'jabber-info-wmii #[771 "\211\205\a\0\300\ 1!\207" [jabber-wmii-message] 5 (#$ . 2394)])
(byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\210\304\305!\207" [put jabber-alert-info-message-hooks custom-options jabber-info-wmii provide jabber-wmii] 6)
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	#@89 Color specification as needed by the wmii window manager for the jabber alert messages.\1f
	9	(defvar jabber-wmii-color "#ffffff #335577 #447799" (#$ . 84))
	10	#@112 If non-nil time to reset wmii message. If nil the message has to be cleared by other means, i.e. from wmiirc.\1f
	11	(defvar jabber-wmii-reset-time "20 sec" (#$ . 242))
	12	#@30 Timer to clear wmii message.\1f
	13	(defvar jabber-wmii-timer nil (#$ . 411))
	14	#@64 Clear any previous message output through wmii window manager.\1f
	15	(defalias 'jabber-wmii-clear #[0 "\3001\ f\0\301\302\303\211\211\304\305&\ 60\207\303\207" [(error) call-process "wmiir" nil "remove" "/rbar/jabber"] 7 (#$ . 488)])
	16	#@46 Show MSG in wmii.
	17
	18	(fn TEXT &optional TITLE)\1f
	19	(defalias 'jabber-wmii-message #[513 "\b\203\b\0\304\b!\210\305 !\306\307\310\"\311\312\ 2\"\216r\211q\210\n\313\ 4\206\1f\0\ 5\261\ 3\210)r\211q\210\314\315\211\ 4\315\316%\210\210\3171C\0\320\321\ 2\315\211\322\323&\ 60\210\202F\0\315\266\ 2\324\ 1!\266\ 2\v\205V\0\325\v\315\326#\211\10\207" [jabber-wmii-timer temporary-file-directory jabber-wmii-color jabber-wmii-reset-time cancel-timer make-temp-file generate-new-buffer " temp file*" t make-closure #[0 "\301\300!\205 \0\302\300!\207" [V0 buffer-name kill-buffer] 2] " " write-region nil 0 (error) call-process "wmiir" "create" "/rbar/jabber" delete-file run-at-time jabber-wmii-clear] 10 (#$ . 717)])
	20	#@78 Show a message through the wmii window manager.
	21
	22	(fn FROM BUFFER TEXT TITLE)\1f
	23	(defalias 'jabber-message-wmii #[1028 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-wmii-message] 7 (#$ . 1395)])
	24	(byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\207" [put jabber-alert-message-hooks custom-options jabber-message-wmii] 6)
	25	#@84 Show a message through the wmii window manager.
	26
	27	(fn NICK GROUP BUFFER TEXT TITLE)\1f
	28	(defalias 'jabber-muc-wmii #[1285 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-wmii-message] 8 (#$ . 1723)])
	29	(byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\207" [put jabber-alert-muc-hooks custom-options jabber-muc-wmii] 6)
	30	#@96 Show a message through the wmii window manager.
	31
	32	(fn WHO OLDSTATUS NEWSTATUS STATUSTEXT TITLE)\1f
	33	(defalias 'jabber-presence-wmii #[1285 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-wmii-message] 8 (#$ . 2045)])
	34	(byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\207" [put jabber-alert-presence-hooks custom-options jabber-presence-wmii] 6)
	35	#@76 Show a message through the wmii window manager.
	36
	37	(fn INFOTYPE BUFFER TEXT)\1f
	38	(defalias 'jabber-info-wmii #[771 "\211\205\a\0\300\ 1!\207" [jabber-wmii-message] 5 (#$ . 2394)])
	39	(byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\210\304\305!\207" [put jabber-alert-info-message-hooks custom-options jabber-info-wmii provide jabber-wmii] 6)