 ;; If you want to be able to M-x without meta
 (global-set-key (kbd "C-x C-m") 'execute-extended-command)
 
-;; A complementary binding to the apropos-command(C-h a)
-(global-set-key (kbd "C-h A") 'apropos)
+;; A complementary binding to the apropos-command (C-h a)
+(define-key 'help-command "A" 'apropos)
 
 ;; Activate occur easily inside isearch
 (define-key isearch-mode-map (kbd "C-o")

(global-set-key (kbd "C-=") 'er/expand-region)
(global-set-key (kbd "C-c w") (make-repeatable-command 'er/expand-region))

(define-key global-map [remap exchange-point-and-mark] 'prelude-exchange-point-and-mark)

(provide 'prelude-global-keybindings)


(global-set-key (kbd "C-x \\") 'align-regexp)

;; Font size
(global-set-key (kbd "C-+") 'text-scale-increase)
(global-set-key (kbd "C--") 'text-scale-decrease)

;; Window switching. (C-x o goes to the next window)
(global-set-key (kbd "C-x O") (lambda ()
