Remove unused functions
This commit is contained in:
parent
ea0343f069
commit
f0a28b3580
1 changed files with 0 additions and 40 deletions
|
@ -141,45 +141,6 @@ MODE1 is enabled and vice-versa."
|
||||||
"Set the `disabled' property for each item in FUNCTIONS to nil."
|
"Set the `disabled' property for each item in FUNCTIONS to nil."
|
||||||
(mapc #'(lambda (f) (put f 'disabled nil)) functions))
|
(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 ()
|
(defun oni:term-mode-func ()
|
||||||
"Function for `term-mode-hook'."
|
"Function for `term-mode-hook'."
|
||||||
(setq truncate-lines nil))
|
(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 "<hiragana>") 'oni:show-org-index)
|
||||||
(global-set-key (kbd "<next>") 'oni:scroll-up-or-next-page)
|
(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 "<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-left)
|
||||||
(global-set-key (kbd "C->") 'indent-shift-right)
|
(global-set-key (kbd "C->") 'indent-shift-right)
|
||||||
(global-set-key (kbd "C-M-4") 'split-window-vertically)
|
(global-set-key (kbd "C-M-4") 'split-window-vertically)
|
||||||
|
|
Loading…
Reference in a new issue