summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorGravatar Tom Willemsen2012-11-28 10:13:49 +0100
committerGravatar Tom Willemsen2012-11-28 10:13:49 +0100
commitbb9e6aab9d1bd89b12d6bcd418c969ac97c86d7d (patch)
tree8549c50acfda7d1adc082695dc2dfe06562b95c5
parent7af92b4abc4ffed5f14cffc7ca63b2da596dd775 (diff)
downloaddotfiles-bb9e6aab9d1bd89b12d6bcd418c969ac97c86d7d.tar.gz
dotfiles-bb9e6aab9d1bd89b12d6bcd418c969ac97c86d7d.zip
.emacs.d/site-lisp/oni.el
-rw-r--r--.emacs.d/site-lisp/oni.el7
1 files changed, 7 insertions, 0 deletions
diff --git a/.emacs.d/site-lisp/oni.el b/.emacs.d/site-lisp/oni.el
index f35249d..1c99555 100644
--- a/.emacs.d/site-lisp/oni.el
+++ b/.emacs.d/site-lisp/oni.el
@@ -104,6 +104,13 @@ DOT are intentionally being skipped."
(local-set-key "\C-j" 'oni:newline-and-indent)
(rainbow-mode))
+(defun oni:current-jabber-status ()
+ "Return a string representing the current jabber status."
+ (or (and (not *jabber-connected*) "Offline")
+ (and (not (string= *jabber-current-status* ""))
+ *jabber-current-status*)
+ "Online"))
+
(defun oni:diary-display-func ()
"Function for `diary-display-hook'."
(diary-fancy-display))