Skip to content

Instantly share code, notes, and snippets.

@puffnfresh

puffnfresh/hipchat.el

Created November 2, 2012 15:34
Show Gist options
  • Star 12 You must be signed in to star a gist
  • Fork 3 You must be signed in to fork a gist
  • Save puffnfresh/4002033 to your computer and use it in GitHub Desktop.
Save puffnfresh/4002033 to your computer and use it in GitHub Desktop.
Download ZIP
HipChat + jabber.el
Raw
hipchat.el
;; Connect using jabber-connect
;; My username from the HipChat configuration
;; from https://www.hipchat.com/account/xmpp
(setq jabber-account-list '(("10804_81219@chat.hipchat.com")))
;; To join HipChat rooms easily
(defvar hipchat-number "10804")
(defvar hipchat-nickname "Brian McKenna")
(defun hipchat-join (room)
(interactive "sRoom name: ")
(jabber-groupchat-join
(jabber-read-account)
(concat hipchat-number "_" room "@conf.hipchat.com")
hipchat-nickname
t))
;; Mention nicknames in a way that HipChat clients will pickup
(defun hipchat-mention (nickname)
(interactive
(list (jabber-muc-read-nickname jabber-group "Nickname: ")))
(insert (concat "@\"" nickname "\" ")))
@bitops
Copy link

bitops commented Apr 30, 2015

I had to do a bit more to get this working: https://gist.github.com/bitops/77308b347bceb54302a2

Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment