Remove unused functions

1 files changed, 0 insertions, 12 deletions

diff --git a/emacs/.emacs.d/init.el b/emacs/.emacs.d/init.el
index 1307dc6..5900ee8 100644
--- a/emacs/.emacs.d/init.el
+++ b/emacs/.emacs.d/init.el
@@ -137,22 +137,10 @@ MODE1 is enabled and vice-versa."
 
 ;;;; Functions
 
-(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:enable (functions)
   "Set the `disabled' property for each item in FUNCTIONS to nil."
   (mapc #'(lambda (f) (put f 'disabled nil)) functions))
 
-(defun oni:level (lst)
-  "Reduce a 2-level list LST to a flat list."
-  (let ((lsts (mapcar (lambda (l) (if (listp l) l (list l))) lst)))
-    (apply #'append lsts)))
-
 (defun oni:locally-enable-double-spaces ()
   "Specify that two spaces end a sentence in the current buffer."
   (setq-local sentence-end-double-space t))