Remove unused functions

1 files changed, 0 insertions, 40 deletions

diff --git a/emacs/.emacs.d/init.el b/emacs/.emacs.d/init.el
index 3332fcf..b8f459f 100644
--- a/emacs/.emacs.d/init.el
+++ b/emacs/.emacs.d/init.el
@@ -141,45 +141,6 @@ MODE1 is enabled and vice-versa."
   "Set the `disabled' property for each item in FUNCTIONS to nil."
   (mapc #'(lambda (f) (put f 'disabled nil)) functions))
 
-(defun oni:split-window-interactive (dir)
-  "Split windows in direction DIR.
-
-Can also delete or switch to another window."
-  (interactive
-   (list (read-char "Direction (h,v,q,d,o): ")))
-  (case dir
-    ((?v) (split-window-vertically))
-    ((?h) (split-window-horizontally))
-    ((?q) (delete-other-windows))
-    ((?d) (delete-window))
-    ((?o) (other-window 1))))
-
-(defun oni:split-window-interactively (window)
-  "Ask for a direction and split WINDOW that way.
-
-If no direction is given, don't split."
-  (let ((dir (read-char "Direction (h,v): ")))
-    (case dir
-      ((?v) (split-window-vertically))
-      ((?h) (split-window-horizontally))
-      (t window))))
-
-(defun oni:start-python-test-mail-server ()
-  "Run the python test mailserver."
-  (interactive)
-  (start-process "python-test-mail-server" "*py-mail-server*" "python" "-m"
-                 "smtpd" "-n" "-c" "DebuggingServer" "localhost:1025"))
-
-(defun oni:stop-python-test-mail-server ()
-  "Stop the python test mailserver."
-  (interactive)
-  (kill-process "python-test-mail-server"))
-
-(defun oni:switch-to-other-buffer ()
-  "Switch to the most recently viewed buffer."
-  (interactive)
-  (switch-to-buffer (other-buffer)))
-
 (defun oni:term-mode-func ()
   "Function for `term-mode-hook'."
   (setq truncate-lines nil))
@@ -760,7 +721,6 @@ If no direction is given, don't split."
 (global-set-key (kbd "<hiragana>") 'oni:show-org-index)
 (global-set-key (kbd "<next>") 'oni:scroll-up-or-next-page)
 (global-set-key (kbd "<prior>") 'oni:scroll-down-or-prev-page)
-(global-set-key (kbd "C-. C-.") #'oni:switch-to-other-buffer)
 (global-set-key (kbd "C-<") 'indent-shift-left)
 (global-set-key (kbd "C->") 'indent-shift-right)
 (global-set-key (kbd "C-M-4") 'split-window-vertically)