diff options
author | Tom Willemse | 2015-12-17 01:26:04 +0100 |
---|---|---|
committer | Tom Willemse | 2015-12-17 01:26:04 +0100 |
commit | bc6c5394ac67ceac417fbdbb196dc7d6be1c5cdb (patch) | |
tree | 9d6eb05cf17e252b350baff3d7480065ad18aede | |
parent | ea35825e1d9d7f81c05b7e96bc903473a37a3ae6 (diff) | |
download | dotfiles-bc6c5394ac67ceac417fbdbb196dc7d6be1c5cdb.tar.gz dotfiles-bc6c5394ac67ceac417fbdbb196dc7d6be1c5cdb.zip |
Remove unused functions
-rw-r--r-- | emacs/.emacs.d/init.el | 12 |
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)) |