Skip to content
Browse files

Up

  • Loading branch information...
1 parent fd04e4a commit f3d35d39c69ae867fb42db51f77f69e4a026aec4 @antono committed Apr 1, 2012
Showing with 19 additions and 6 deletions.
  1. +5 −0 antono/my-bindings.el
  2. +0 −2 antono/my-eshell.el
  3. +13 −0 antono/my-minimap.el
  4. +1 −4 antono/my-shell.el
View
5 antono/my-bindings.el
@@ -1,6 +1,10 @@
(global-set-key (kbd "M-x") 'smex)
+(global-set-key (kbd "M-X") 'smex-major-mode-commands)
+
(global-set-key (kbd "s-l") 'helm-mini)
+(global-set-key (kbd "C-S-s-l") 'helm-locate)
(global-set-key (kbd "s-i") 'helm-imenu)
+(global-set-key (kbd "s-B") 'helm-bookmarks)
(global-set-key (kbd "C-<f10>") 'menu-bar-mode)
(global-set-key (kbd "s-e") 'speedbar-get-focus)
@@ -37,3 +41,4 @@
;; Start shell or switch to it if it's active.
(global-set-key (kbd "C-x m") 'shell)
+
View
2 antono/my-eshell.el
@@ -21,8 +21,6 @@
(defun eshell/open (file)
(find-file file))
-
-
;;; Vi
(defun eshell/vi (&rest args)
"Invoke `find-file' on the file.
View
13 antono/my-minimap.el
@@ -0,0 +1,13 @@
+(require 'minimap)
+
+(setq minimap-window-location 'right)
+
+;; Minimap toggling
+(defun minimap-toggle ()
+ "Show minimap if hidden, hide if present."
+ (interactive)
+ (if (and minimap-bufname
+ (get-buffer minimap-bufname)
+ (get-buffer-window (get-buffer minimap-bufname)))
+ (minimap-kill)
+ (minimap-create)))
View
5 antono/my-shell.el
@@ -1,5 +1,2 @@
-;; Enable trace highlighting in 'shell
-(add-hook 'shell-mode 'compilation-shell-minor-mode)
-
-(setq shell-prompt-pattern "\\[antono.*∴")
(setq comint-scroll-to-bottom-on-input t)
+(add-hook 'shell-mode-hook 'compilation-shell-minor-mode)

0 comments on commit f3d35d3

Please sign in to comment.
Something went wrong with that request. Please try again.