X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;f=emacs.d%2Fconfig.org;h=4e4968576dd70addb5d92d1028a609e2ba7f8b47;hb=d0ca94df3b13cde1de1e88b897d34b68d1081c80;hp=9660544b782c37399bf7b8c1d6d170cc6d3a8efd;hpb=f4681ea8ee1b8282511f6b2d6c15c01c920b6caa;p=dotfiles.git diff --git a/emacs.d/config.org b/emacs.d/config.org index 9660544..4e49685 100644 --- a/emacs.d/config.org +++ b/emacs.d/config.org @@ -1085,6 +1085,41 @@ extend org-mode's easy templates, refer to [[http://coldnew.github.io/coldnew-em '("m" "\\begin{equation}\n?\n\\end{equation}")) #+END_SRC +** Org theme +#+BEGIN_SRC emacs-lisp :tangle yes :results silent + (set-face-attribute 'variable-pitch nil :font "Calibri" :height 160) + (set-face-attribute 'fixed-pitch nil :font "Source Code Pro" :height 120) + + (add-hook 'text-mode-hook 'variable-pitch-mode) + + ;; Install Ubuntu Mono fonts and apply it in org-table to align Chinese fonts + (with-eval-after-load "org" + (set-face-attribute 'org-code nil :inherit 'fixed-pitch) + (set-face-attribute 'org-block nil :inherit 'fixed-pitch) + (set-face-attribute 'org-table nil :family "Ubuntu Mono" :height 120) + (set-face-attribute 'org-block-background nil :inherit 'fixed-pitch) + ;; fix indent broken by variable-pitch-mode + ;; http://emacs.stackexchange.com/questions/26864/variable-pitch-face-breaking-indentation-in-org-mode + (require 'org-indent) + (set-face-attribute 'org-indent nil :inherit '(org-hide fixed-pitch))) +#+END_SRC + +*** variable-pich mode +[[https://yoo2080.wordpress.com/2013/05/30/monospace-font-in-tables-and-source-code-blocks-in-org-mode-proportional-font-in-other-parts/][monospace font in tables and source code blocks in org-mode, proportional font in other parts]] +#+BEGIN_SRC emacs-lisp :tangle yes :results silent +; (set-face-attribute 'variable-pitch nil :font "Calibri" :height 160) +; (set-face-attribute 'fixed-pitch nil :font "Source Code Pro" :height 130) + + + ;; (add-hook 'text-mode-hook 'variable-pitch-mode) + + ;; monospace mode for block in org-mode + ;; (with-eval-after-load "org" + ;; (mapc (lambda (face) + ;; (set-face-attribute face nil :inherit 'fixed-pitch)) + ;; (list 'org-code 'org-block 'org-table 'org-block-background))) +#+END_SRC + * Magit [[https://github.com/magit/magit][Magit]] is a very cool git interface on Emacs. and Defined keys, using vi keybindings, Refer abo-abo's setting [[https://github.com/abo-abo/oremacs/blob/c5cafdcebc88afe9e73cc8bd40c49b70675509c7/modes/ora-nextmagit.el][here]] @@ -1768,7 +1803,7 @@ here on Mac, just use "open" commands to pen =.pdf=, =.html= and image files (define-key company-active-map (kbd "TAB") #'company-complete-selection) (define-key company-active-map [tab] #'company-complete-selection) (global-company-mode) - (setq company-global-modes '(not org-mode))) + (setq company-global-modes '(not org-mode magit-status-mode))) (use-package company-statistics :ensure t @@ -3332,89 +3367,11 @@ Refer [[https://github.com/fnwiya/dotfiles/blob/c9ca79f1b22c919d9f4c3a0f944ba828 (global-set-key (kbd "C-w") 'sd/kill-region-or-backward-kill-word) #+END_SRC - - * TODO todolist ** rucket ** player video on iphone for ** SICP ** music searcher search music on some music web site -#+BEGIN_SRC emacs-lisp :tangle yes :results silent - ;; (create-fontset-from-fontset-spec - ;; "-*-Source Code Pro-*-*-*-*-12-*-*-*-*-*-fontset-Source Code Pro, - ;; ascii:-*-Source Code Pro-normal-normal-normal-*-23-*-*-*-m-0-iso10646-1, - ;; latin-iso8859-1:-*-Source Code Pro-normal-normal-normal-*-17-*-*-*-m-0-iso10646-1, - ;; latin-iso8859-15:-*-Source Code Pro-normal-normal-normal-*-17-*-*-*-m-0-iso10646-1, - ;; chinese-gb2312:-*-STHeiti-*-*-*-*-14-*-*-*-c-*-*-*, - ;; han:-*-STHeiti-*-*-*-*-14-*-*-*-c-*-*-*") - - - ;; (create-fontset-from-fontset-spec - ;; "-*-Courier New-normal-r-*-*-14-*-*-*-c-*-fontset-myfixwidth, - ;; ascii:-*-Courier New-normal-normal-normal-*-17-*-*-*-m-0-iso10646-1, - ;; kana:-*-STFangsong-normal-r-*-*-16-*-*-*-c-*-*-*, - ;; han:-*-STFangsong-normal-r-*-*-16-*-*-*-c-*-*-*, - ;; symbol:-*-STFangsong-normal-r-*-*-16-*-*-*-c-*-*-*, - ;; cjk-misc:-*-STFangsong-normal-r-*-*-16-*-*-*-c-*-*-*, - ;; bopomofo:-*-STFangsong-normal-r-*-*-16-*-*-*-c-*-*-*" t) - ;; (create-fontset-from-fontset-spec - ;; "-*-Courier New-normal-r-*-*-14-*-*-*-c-*-fontset-myfixwidth, - ;; ascii:-*-Courier New-normal-normal-normal-*-17-*-*-*-m-0-iso10646-1") - - ;; (create-fontset-from-fontset-spec - ;; "-*-Source Code Pro-normal-normal-normal-*-12-*-*-*-*-*-fontset-osaka12") - ;; (create-fontset-from-fontset-spec - ;; "-*-Source Code Pro-normal-normal-normal-*-12-*-*-*-*-*-fontset-osaka13") - - ;; (create-fontset-from-fontset-spec - ;; "-*-consolas-*-*-*-*-12-*-*-*-*-*-fontset-consolas, - ;; ascii:-*-consolas-*-*-*-*-12-*-*-*-*-*-iso8859-1, - ;; latin-iso8859-1:-*-consolas-*-*-*-*-12-*-*-*-*-*-iso8859-1, - ;; latin-iso8859-15:-*-consolas-*-*-*-*-12-*-*-*-*-*-iso8859-15") - - ;; (setq default-frame-alist '(;; (width . 100) - - ;; ;; (height . 44) - - ;; ;; (top . 50) - ;; ;pixels - ;; ;; (left . 50) - ;; ;pixels - ;; (font . "fontset-my-private") - ;; )) - ;; (with-eval-after-load "org" - ;; (set-face-attribute 'org-code nil :family "fontset-myfixwidth") - ;; (set-face-attribute 'org-block nil :family "fontset-myfixwidth") - ;; (set-face-attribute 'org-table nil :family "fontset-myfixwidth") - ;; (set-face-attribute 'org-block-background nil :family "fontset-myfixwidth")) - ;; (setq default-frame-alist - ;; (append - ;; '((font . "fontset-osaka13")) default-frame-alist)) - - - ;; (set-fontset-font - ;; "fontset-default" nil - ;; "-*-stheiti-*-*-*-*-14-*-*-*-*-*-gb2312.1980-*" nil 'prepend) - ;; (set-fontset-font - ;; "fontset-osaka12" 'kana - ;; "-*-stheiti-*-*-*-*-14-*-*-*-*-*-gbk-0" nil 'prepend) - ;; (set-fontset-font - ;; "fontset-osaka12" 'han - ;; "-*-stheiti-*-*-*-*-14-*-*-*-*-*-gbk-0" nil 'prepend) - ;; (set-fontset-font - ;; "fontset-osaka12" 'cjk-misc - ;; "-*-stheiti-*-*-*-*-14-*-*-*-*-*-gbk-0" nil 'prepend) - (set-face-attribute 'variable-pitch nil :font "Calibri" :height 160) - (set-face-attribute 'fixed-pitch nil :font "Source Code Pro" :height 120) - - (add-hook 'text-mode-hook 'variable-pitch-mode) - - (with-eval-after-load "org" - (set-face-attribute 'org-code nil :inherit 'fixed-pitch) - (set-face-attribute 'org-block nil :inherit 'fixed-pitch) - (set-face-attribute 'org-table nil :family "Ubuntu Mono" :height 120) - (set-face-attribute 'org-block-background nil :inherit 'fixed-pitch)) -#+END_SRC