;ELC ;;; Compiled ;;; in Emacs version 28.0.50 ;;; with all optimizations. #@29 Additional args to naughty. (custom-declare-variable 'jabber-awesome-args ", timeout=5" '(#$ . 87) :type 'string :group 'jabber-alerts) #@21 Show MSG in Awesome (defalias 'jabber-awesome-message #[(text &optional title) "\3041\305\306\307\310 \206\n #!)0\207\210\305\207" [process-connection-type title text jabber-awesome-args (error) nil shell-command-to-string format "echo 'naughty.notify({text = \"%s\" %s})' | awesome-client -"] 5 (#$ . 229)]) #@51 Show a message through the Awesome window manager (defalias 'jabber-message-awesome #[(from buffer text title) "\205\302 \"\207" [title text jabber-awesome-message] 3 (#$ . 549)]) (byte-code "\301\302\303\302\303N\304>\203\202\304B)#\207" [#:vlist put jabber-alert-message-hooks custom-options jabber-message-awesome] 5) #@51 Show a message through the Awesome window manager (defalias 'jabber-muc-awesome #[(nick group buffer text title) "\205\302 \"\207" [title text jabber-awesome-message] 3 (#$ . 888)]) (byte-code "\301\302\303\302\303N\304>\203\202\304B)#\207" [#:vlist put jabber-alert-muc-hooks custom-options jabber-muc-awesome] 5) #@51 Show a message through the Awesome window manager (defalias 'jabber-presence-awesome #[(who oldstatus newstatus statustext title) "\205\302 \"\207" [title statustext jabber-awesome-message] 3 (#$ . 1221)]) (byte-code "\301\302\303\302\303N\304>\203\202\304B)#\207" [#:vlist put jabber-alert-presence-hooks custom-options jabber-presence-awesome] 5) #@51 Show a message through the Awesome window manager (defalias 'jabber-info-awesome #[(infotype buffer text) "\205\301!\207" [text jabber-awesome-message] 2 (#$ . 1588)]) (byte-code "\301\302\303\302\303N\304>\203\202\304B)#\207" [#:vlist put jabber-alert-info-message-hooks custom-options jabber-info-awesome] 5) (defalias 'jabber-muc-awesome-personal #[(nick group buffer text title) "\305 \"\205\306\n \f%\207" [text group nick buffer title jabber-muc-looks-like-personal-p jabber-muc-awesome] 6]) (byte-code "\301\302\303\302\303N\304>\203\202\304B)#\210\305\306!\207" [#:vlist put jabber-alert-muc-hooks custom-options jabber-muc-awesome-personal provide jabber-awesome] 5)