Skip to content
This repository has been archived by the owner on Jan 3, 2023. It is now read-only.

Commit

Permalink
Remove some ill-advised bindings.
Browse files Browse the repository at this point in the history
  • Loading branch information
@technomancy
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
View file
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 O") (lambda () (interactive) (other-window -1))) ;; back one
(global-set-key (kbd "C-x C-o") (lambda () (interactive) (other-window 2))) ;; forward two (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)

This comment has been minimized.

Sign in to view

Copy link
@mahmoudimus

mahmoudimus Jan 4, 2011

Why is this an "ill-advisted" key-binding? Just curious, because I use this key binding a lot and I had to add it back in.

This comment has been minimized.

Sign in to view

Copy link
@technomancy

technomancy Jan 6, 2011

Author Owner

When I added this I didn't realize that M-S-6 is also bound to join-line. I might add in my own binding since that's really awkward to hit on some keyboards, but C-x ^ isn't any better.

This comment has been minimized.

Sign in to view

Copy link
@mahmoudimus

mahmoudimus Jan 7, 2011

Ah OK. True:) C-c S-J would work since that's a VIM keybinding and might come natural if you've ever tried VIM. (ESC-Shift-j)

But cool, makes sense why would do that :)

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


Expand All @@ -56,7 +53,7 @@
;; Start a regular shell if you prefer that. ;; Start a regular shell if you prefer that.
(global-set-key (kbd "C-x M-m") 'shell) (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) (global-set-key (kbd "C-x C-m") 'execute-extended-command)


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


;; Applications ;; So good!

(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)
(global-set-key (kbd "C-x g") 'magit-status) (global-set-key (kbd "C-x g") 'magit-status)


;; This is a little hacky since VC doesn't support git add internally ;; 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) (define-key global-map "\C-ca" 'org-agenda)


(provide 'starter-kit-bindings) (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.