From bc6c5394ac67ceac417fbdbb196dc7d6be1c5cdb Mon Sep 17 00:00:00 2001 From: Tom Willemse Date: Thu, 17 Dec 2015 01:26:04 +0100 Subject: [PATCH] Remove unused functions --- emacs/.emacs.d/init.el | 12 ------------ 1 file changed, 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))