Skip to content

Commit

Permalink
Remove some ill-advised bindings.
Browse files Browse the repository at this point in the history
  • Loading branch information
technomancy committed May 13, 2010
1 parent 1a6e4d1 commit 6cefb65
Showing 1 changed file with 3 additions and 14 deletions.
17 changes: 3 additions & 14 deletions starter-kit-bindings.el
Expand Up @@ -44,9 +44,6 @@
(global-set-key (kbd "C-x O") (lambda () (interactive) (other-window -1))) ;; back one
(global-set-key (kbd "C-x C-o") (lambda () (interactive) (other-window 2))) ;; forward two

;; Indentation help
(global-set-key (kbd "C-x ^") 'join-line)

;; Start eshell or switch to it if it's active.
(global-set-key (kbd "C-x m") 'eshell)

Expand All @@ -56,7 +53,7 @@
;; Start a regular shell if you prefer that.
(global-set-key (kbd "C-x M-m") 'shell)

;; If you want to be able to M-x without meta
;; If you want to be able to M-x without meta (phones, etc)
(global-set-key (kbd "C-x C-m") 'execute-extended-command)

;; Fetch the contents at a URL, display it raw.
Expand All @@ -71,15 +68,7 @@
;; For debugging Emacs modes
(global-set-key (kbd "C-c p") 'message-point)

;; Applications

(global-set-key (kbd "C-c j") (lambda () (interactive) (switch-or-start 'jabber-connect "*-jabber-*")))
(global-set-key (kbd "C-c g") (lambda () (interactive) (switch-or-start 'gnus "*Group*")))
(global-set-key (kbd "C-c i") (lambda () (interactive) (switch-or-start (lambda ()
(rcirc-connect "irc.freenode.net"))
"*irc.freenode.net*")))
(global-set-key (kbd "C-c J") 'jabber-send-presence)
(global-set-key (kbd "C-c M-j") 'jabber-disconnect)
;; So good!
(global-set-key (kbd "C-x g") 'magit-status)

;; This is a little hacky since VC doesn't support git add internally
Expand All @@ -101,4 +90,4 @@
(define-key global-map "\C-ca" 'org-agenda)

(provide 'starter-kit-bindings)
;;; starter-kit-bindings.el ends here
;;; starter-kit-bindings.el ends here

0 comments on commit 6cefb65

Please sign in to comment.