ryuslash/legacy-dotfiles
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Remove some old custom functions

Browse source 
They get in the way more than they should.
This commit is contained in:
Tom Willemse 2013-05-15 16:00:19 +02:00
parent cc4bdd72d7
commit 08e5782f64
2 changed files with 0 additions and 24 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

3
emacs/init.org
View file

@ -1444,10 +1444,7 @@
(global-set-key (kbd "C-c i p") 'identica-update-status-interactive) (global-set-key (kbd "C-c i p") 'identica-update-status-interactive)
(global-set-key (kbd "C-c p") 'oni:show-buffer-position) (global-set-key (kbd "C-c p") 'oni:show-buffer-position)
(global-set-key (kbd "C-c t") 'oni:raise-ansi-term) (global-set-key (kbd "C-c t") 'oni:raise-ansi-term)
(global-set-key (kbd "C-d") 'oni:kill-region-or-forward-char)
(global-set-key (kbd "C-e") 'oni:move-end-of-dwim) (global-set-key (kbd "C-e") 'oni:move-end-of-dwim)
(global-set-key (kbd "C-k") 'oni:kill-region-or-line)
(global-set-key (kbd "C-w") 'oni:kill-region-or-backward-char)
(global-set-key (kbd "M-0") 'delete-window) (global-set-key (kbd "M-0") 'delete-window)
(global-set-key (kbd "M-1") 'delete-other-windows) (global-set-key (kbd "M-1") 'delete-other-windows)
(global-set-key (kbd "M-2") 'split-window-below) (global-set-key (kbd "M-2") 'split-window-below)

21
emacs/site-lisp/oni.el
View file

@ -205,27 +205,6 @@ If COUNT has been specified indent by that much, otherwise look at
(oni:js-mode-func) (oni:js-mode-func)
(local-set-key (kbd "<f5>") #'slime-js-reload)) (local-set-key (kbd "<f5>") #'slime-js-reload))
(defun oni:kill-region-or-backward-char ()
"Either `kill-region' or `backward-delete-char-untabify'."
(interactive)
(if (region-active-p)
(kill-region (region-beginning) (region-end))
(backward-delete-char-untabify 1)))
(defun oni:kill-region-or-forward-char ()
"Either `kill-region' or `delete-forward-char'."
(interactive)
(if (region-active-p)
(kill-region (region-beginning) (region-end))
(delete-forward-char 1)))
(defun oni:kill-region-or-line ()
"Either `kill-region' or `kill-line'."
(interactive)
(if (region-active-p)
(kill-region (region-beginning) (region-end))
(kill-line)))
(defun oni:lua-mode-func() (defun oni:lua-mode-func()
"Function for `lua-mode-hook'." "Function for `lua-mode-hook'."
(local-unset-key (kbd ")")) (local-unset-key (kbd ")"))