set height in mode line
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
(with-eval-after-load "powerline"
- (let* ((base-font-size (face-attribute 'default :height)))
- ;; 100/140;0.8
- (set-variable 'powerline-height (/ base-font-size 10))
- (set-variable 'powerline-text-scale-factor (/ (float 100) base-font-size)))
- (set-face-attribute 'mode-line nil :height 100)
- (set-face-attribute 'mode-line-inactive nil :height 100))
+ (if window-system
+ (progn
+ (let* ((base-font-size (face-attribute 'default :height)))
+ ;; 100/140;0.8
+ (set-variable 'powerline-height (/ base-font-size 10))
+ (set-variable 'powerline-text-scale-factor (/ (float 100) base-font-size)))
+ (set-face-attribute 'mode-line nil :height 100)
+ (set-face-attribute 'mode-line-inactive nil :height 100))))
#+END_SRC
* IDO & SMEX
(sqlite . t)
(js . t)
(gnuplot . t)
- (ditaa . t)))
+ (ditaa . t)
+ ))
;; use current window for org source buffer editting
(setq org-src-window-setup 'current-window )
:ensure t)
#+END_SRC
+*** plantUML
+[[http://eschulte.github.io/babel-dev/DONE-integrate-plantuml-support.html][DONE-integrate-plantuml-support]]
+#+BEGIN_SRC sh
+ ## support plantuml
+ brew install plantuml
+#+END_SRC
+
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+ (use-package plantuml-mode
+ :ensure t)
+
+ (setq org-plantuml-jar-path
+ (expand-file-name "/usr/local/Cellar/plantuml/8041/plantuml.8041.jar"))
+
+ (set-variable 'plantuml-jar-path
+ (expand-file-name "/usr/local/Cellar/plantuml/8041/plantuml.8041.jar"))
+#+END_SRC
+
** Org-bullets
use [[https://github.com/sabof/org-bullets][org-bullets]] package to show utf-8 charactes
#+BEGIN_SRC emacs-lisp :tangle yes :results silent
(setq org-bullets-bullet-list '("⦿" "✪" "◉" "○" "►" "◆"))
;; increase font size when enter org-src-mode
- (add-hook 'org-src-mode-hook (lambda () (text-scale-increase 2)))
+ ;; (add-hook 'org-src-mode-hook (lambda () (text-scale-increase 2)))
#+END_SRC
** Worf Mode
'("C" "#+BEGIN_SRC c :tangle ?\n\n#+END_SRC"))
(add-to-list 'org-structure-template-alist
'("m" "\\begin{equation}\n?\n\\end{equation}"))
+
+ (add-to-list 'org-structure-template-alist
+ '("b" "#+STARTUP: showall
+ ,#+STARTUP: inlineimages
+ ,#+OPTIONS: toc:nil\n"))
#+END_SRC
** Org theme
:sitemap-filename "sitemap.org" ;... call it sitemap.org (it's the default )...
:sitemap-title "Sitemap"
- :table-of-contents nil
- :html-postamble nil ;dont export creator auto validation info in html postamble div
+ :html-table-of-contents nil
+ :html-postamble nil ;dont export creator auto validation info in html postamble div
:html-link-home "/"
- :html-head "<link rel='stylesheet' href='./css/worg_old.css' />"
- ;; :html-head-extra ,my-blog-extra-head
+ :html-head "<link rel='stylesheet' href='./css/worg.css' />"
:html-head-include-default-style nil
:html-head-include-scripts nil)
("org-static"
:base-extension "css\\|js\\|png\\|gif\\|pdf\\|mp3\\|ogg\\|swf"
:publishing-directory "~/Private/publish_html"
:recursive t
- :publishing-function org-publish-attachment)
+ :publishing-function org-publish-attachment
+ :table-of-contents nil)
("org" :components ("org-notes" "org-static"))))
#+END_SRC
:config
(elscreen-start)
(set-face-attribute 'elscreen-tab-current-screen-face nil :foreground "black" :background "yellow")
- (set-face-attribute 'elscreen-tab-other-screen-face nil :foreground "black" :background "disabledControlTextColor" :underline nil))
+ (set-face-attribute 'elscreen-tab-other-screen-face nil :foreground "black" :background "disabledControlTextColor" :underline nil)
+ ;; (global-unset-key (kbd)); M-TAB switch screen
+ (global-set-key (kbd "s-`") '(lambda () (interactive) (elscreen-goto 0)))
+ (dotimes (i 8)
+ (global-set-key (kbd (concat "s-" (number-to-string (+ i 1))))
+ `(lambda () (interactive) (elscreen-goto ,(+ i 1))))))
#+END_SRC
* Dired
+** Need separate the Key-bindings and package-initialization