diff --git a/emacs/init.el b/emacs/init.el index a3eff7b..fa7188d 100644 --- a/emacs/init.el +++ b/emacs/init.el @@ -49,12 +49,6 @@ (require 'ext) (require 'oni) -(put 'upcase-region 'disabled nil) -(put 'downcase-region 'disabled nil) -(put 'narrow-to-region 'disabled nil) -(put 'scroll-left 'disabled nil) - -(setq-default bidi-paragraph-direction 'left-to-right) (setq-default c-basic-offset 4) (setq-default fci-rule-column 73) (setq-default indent-tabs-mode nil) diff --git a/emacs/init.org b/emacs/init.org index 9ac0ef7..d8eb2e7 100644 --- a/emacs/init.org +++ b/emacs/init.org @@ -1,8 +1,8 @@ #+TITLE: Emacs init -#+OPTIONS: author:nil num:nil -#+STARTUP: showall #+LINK: yoshi-theme http://ryuslash.org/projects/yoshi-theme.html +#+OPTIONS: author:nil num:nil #+PROPERTY: tangle init2.el +#+STARTUP: showall * GUI @@ -425,3 +425,40 @@ (global-set-key (kbd "") 'oni:raise-eshell) #+END_SRC + +* svg-mode-line-themes + + After Emacs has initialized, enable =svg-mode-line-themes= and select + a theme. + + #+BEGIN_SRC emacs-lisp + (defun oni:enable-svg-mode-line-theme () + "Enable `svg-mode-line-theme' and select a theme." + (smt/enable) + (smt/set-theme 'black-crystal)) + + (add-hook 'emacs-startup-hook 'oni:enable-svg-mode-line-theme) + #+END_SRC + +* bidi + + Disable bi-directional text, since I don't write right-to-left + myself and I don't know anyone who does. I have read that it is a + bad idea to disable it completely, but forcing left-to-right should + help. + + #+BEGIN_SRC emacs-lisp + (setq-default bidi-paragraph-direction 'left-to-right) + #+END_SRC + +* disabled + + There are some functions which get disabled by default because they + "confuse new users", but these I like using. + + #+BEGIN_SRC emacs-lisp + (put 'upcase-region 'disabled nil) + (put 'downcase-region 'disabled nil) + (put 'narrow-to-region 'disabled nil) + (put 'scroll-left 'disabled nil) + #+END_SRC