summaryrefslogtreecommitdiffstats
path: root/.emacs.d/init.el
diff options
context:
space:
mode:
authorGravatar Tom Willemsen2012-10-07 22:13:55 +0200
committerGravatar Tom Willemsen2012-10-07 22:13:55 +0200
commit4fab1e25f3e96ef815f9fda2d9685720e632ad82 (patch)
treeefc71583382c84a2c5292892cb7552decdd40857 /.emacs.d/init.el
parent4f7962022fdc4d39e76ab3729dcfb3a48f4df645 (diff)
downloaddotfiles-4fab1e25f3e96ef815f9fda2d9685720e632ad82.tar.gz
dotfiles-4fab1e25f3e96ef815f9fda2d9685720e632ad82.zip
.emacs.d/init.el
Diffstat (limited to '.emacs.d/init.el')
-rw-r--r--.emacs.d/init.el12
1 files changed, 10 insertions, 2 deletions
diff --git a/.emacs.d/init.el b/.emacs.d/init.el
index 207d6f2..41fef90 100644
--- a/.emacs.d/init.el
+++ b/.emacs.d/init.el
@@ -21,6 +21,8 @@
'("/usr/share/emacs/site-lisp" "~/.emacs.d/site-lisp"))
(add-to-list 'load-path "~/.emacs.d/"))
+(require 'mode-icons)
+
(autoload 'define-slime-contrib "slime")
(autoload 'gtags-mode "gtags" nil t)
(autoload 'identica-mode "identica-mode" nil t)
@@ -563,6 +565,11 @@ insert at the end of the region and at the beginning."
(setq dir (replace-match "\\1/" nil nil dir)))
dir)
+(defun oni:show-buffer-position ()
+ "Show the position in the current buffer."
+ (interactive)
+ (message (format "%d:%d" (line-number-at-pos) (current-column))))
+
(defun oni:split-window-interactive (dir)
"Split windows in direction DIR.
@@ -1013,6 +1020,7 @@ for easy selection."
(global-set-key (kbd "<f8>") 'oni:raise-eshell)
(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)
(global-set-key (kbd "C-M-SPC") 'er/expand-region)
(global-set-key (kbd "C-M-d") 'kill-word)
(global-set-key (kbd "C-M-w") 'backward-kill-word)
@@ -1021,15 +1029,15 @@ for easy selection."
(global-set-key (kbd "C-c a") 'org-agenda)
(global-set-key (kbd "C-c c") 'org-capture)
(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-d") 'oni:kill-region-or-forward-char)
(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 "C-x C-b") 'electric-buffer-list)
+(global-set-key (kbd "M-4") 'split-window-horizontally)
(global-set-key (kbd "M-n") 'idomenu)
(global-set-key (kbd "\"") 'oni:self-insert-dwim)
-(global-set-key (kbd "M-4") 'split-window-horizontally)
-(global-set-key (kbd "C-M-4") 'split-window-vertically)
(if (daemonp)
(global-set-key "\C-x\C-c" 'oni:close-client-window)