Emacs: Cleanup the other sections

This commit is contained in:
Tom Willemsen 2013-01-04 01:34:02 +01:00
parent 4ce6139824
commit 8e5daed796

View file

@ -260,30 +260,56 @@
* Aliases * Aliases
There are some functions that are just better than others, no I've never had any trouble with accidentally pressing ~y~ while being
matter how politically incorrect it might be to admit. asked a question, so I've never had any reason to prefer ~yes-or-no-p~
over ~y-or-n-p~.
#+begin_src emacs-lisp :tangle init2.el
(defalias 'yes-or-no-p 'y-or-n-p)
#+end_src
~ibuffer~ is a drop-in replacement for ~list-buffers~, but with more
features.
#+begin_src emacs-lisp :tangle init2.el
(defalias 'list-buffers 'ibuffer)
#+end_src
I don't know if replacing ~dabbrev-expand~ with ~hippie-expand~, but at
least ~hippie-expand~ doesn't use ~dabbrev-expand~, and I haven't
noticed anything wrong so far, and ~hippie-expand~ does so much more
than ~dabbrev-expand~.
#+BEGIN_SRC emacs-lisp :tangle init2.el #+BEGIN_SRC emacs-lisp :tangle init2.el
(defalias 'yes-or-no-p 'y-or-n-p)
(defalias 'list-buffers 'ibuffer)
(defalias 'dabbrev-expand 'hippie-expand) (defalias 'dabbrev-expand 'hippie-expand)
#+END_SRC #+END_SRC
* Faces * Faces
Define faces for use with ~magit~ log edit mode. Define a face to how the summary line of git commits as the first
headline of an ~org-mode~ file.
#+BEGIN_SRC emacs-lisp :tangle init2.el #+begin_src emacs-lisp :tangle init2.el
(defface git-commit-summary-face (defface git-commit-summary-face
'((t (:inherit org-level-1))) '((t (:inherit org-level-1)))
"Face for the git title line." "Face for the git title line."
:group 'local) :group 'local)
#+end_src
Define a face to show characters that have been placed beyond the
maximum length of a summary line.
#+begin_src emacs-lisp :tangle init2.el
(defface git-commit-overlong-summary-face (defface git-commit-overlong-summary-face
'((t (:background "#873732"))) '((t (:background "#873732")))
"Face for commit titles that are too long." "Face for commit titles that are too long."
:group 'local) :group 'local)
#+end_src
Define a face to show characters that have been placed on the second
line of a git commit. Those should always remain empty.
#+BEGIN_SRC emacs-lisp :tangle init2.el
(defface git-commit-nonempty-second-line-face (defface git-commit-nonempty-second-line-face
'((t (:inherit git-commit-overlong-summary-face))) '((t (:inherit git-commit-overlong-summary-face)))
"Face for the supposedly empty line in commit messages." "Face for the supposedly empty line in commit messages."
@ -292,19 +318,14 @@
* Keys * Keys
With the awesome power of Emacs comes the need for lots of Since the ~C-l~ combination is so much easier than ~C-j~ when using the
keybindings. [[http://colemak.com][colemak]] keyboard layout and I use ~C-j~ much more, switch them.
** Translation
Since the ~C-l~ combination is so much easier than ~C-j~ when using
the [[http://colemak.com][colemak]] keyboard layout and ~C-j~ is used so much more, switch
them.
#+BEGIN_SRC emacs-lisp tangle init2.el #+BEGIN_SRC emacs-lisp tangle init2.el
(define-key key-translation-map (kbd "C-j") (kbd "C-l")) (define-key key-translation-map (kbd "C-j") (kbd "C-l"))
(define-key key-translation-map (kbd "C-l") (kbd "C-j")) (define-key key-translation-map (kbd "C-l") (kbd "C-j"))
#+END_SRC #+END_SRC
* Footnotes * Footnotes
[fn:1] Though it doesn't happen often that ~trunk~ is so messed up that [fn:1] Though it doesn't happen often that ~trunk~ is so messed up that