| | 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\302\303\304DD\305\306\307\310\311&\a\207" [custom-declare-variable jabber-awesome-args funcall function #[0 "\300\207" [", timeout=5"] 1 ""] "Additional args to naughty." :type string :group jabber-alerts] 8) |
| | 9 | #@48 Show MSG in Awesome |
| | 10 | |
| | 11 | (fn TEXT &optional TITLE)\1f |
| | 12 | (defalias 'jabber-awesome-message #[513 "\3021\14\0\303\18\304\305\306\ 3\206\ e\0\ 4 #!)0\207\303\207" [process-connection-type jabber-awesome-args (error) nil shell-command-to-string format "echo 'naughty.notify({text = \"%s\" %s})' | awesome-client -"] 7 (#$ . 313)]) |
| | 13 | #@80 Show a message through the Awesome window manager |
| | 14 | |
| | 15 | (fn FROM BUFFER TEXT TITLE)\1f |
| | 16 | (defalias 'jabber-message-awesome #[1028 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-awesome-message] 7 (#$ . 625)]) |
| | 17 | (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-awesome] 6) |
| | 18 | #@86 Show a message through the Awesome window manager |
| | 19 | |
| | 20 | (fn NICK GROUP BUFFER TEXT TITLE)\1f |
| | 21 | (defalias 'jabber-muc-awesome #[1285 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-awesome-message] 8 (#$ . 963)]) |
| | 22 | (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-awesome] 6) |
| | 23 | #@98 Show a message through the Awesome window manager |
| | 24 | |
| | 25 | (fn WHO OLDSTATUS NEWSTATUS STATUSTEXT TITLE)\1f |
| | 26 | (defalias 'jabber-presence-awesome #[1285 "\211\205\b\0\300\ 2\ 2\"\207" [jabber-awesome-message] 8 (#$ . 1295)]) |
| | 27 | (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-awesome] 6) |
| | 28 | #@78 Show a message through the Awesome window manager |
| | 29 | |
| | 30 | (fn INFOTYPE BUFFER TEXT)\1f |
| | 31 | (defalias 'jabber-info-awesome #[771 "\211\205\a\0\300\ 1!\207" [jabber-awesome-message] 5 (#$ . 1655)]) |
| | 32 | (byte-code "\300\301\302\301\302N\303\ 1>\203\10\0\211\202\13\0\303\ 1B\262\ 1#\207" [put jabber-alert-info-message-hooks custom-options jabber-info-awesome] 6) |
| | 33 | #@37 |
| | 34 | |
| | 35 | (fn NICK GROUP BUFFER TEXT TITLE)\1f |
| | 36 | (defalias 'jabber-muc-awesome-personal #[1285 "\300\ 2\ 5\"\205\ e\0\301\ 5\ 5\ 5\ 5\ 5%\207" [jabber-muc-looks-like-personal-p jabber-muc-awesome] 11 (#$ . 1988)]) |
| | 37 | (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-muc-hooks custom-options jabber-muc-awesome-personal provide jabber-awesome] 6) |
projects / config.git / blame_incremental