From bc6c5394ac67ceac417fbdbb196dc7d6be1c5cdb Mon Sep 17 00:00:00 2001
From: Tom Willemse
Date: Thu, 17 Dec 2015 01:26:04 +0100
Subject: Remove unused functions

---
 emacs/.emacs.d/init.el | 12 ------------
 1 file changed, 12 deletions(-)

(limited to 'emacs')

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))
-- 
cgit v1.2.3-54-g00ecf