X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;f=emacs.d%2Fconfig.org;h=d730e3c71a08fd552c3db579096032da03ee025c;hb=7ee116b542b5600bf463eecfbbd544ad81c8fd4b;hp=0ab4667c67c98385536749c93f1b433acc9af5bb;hpb=ddae35fd7e6a69d80c05d073b36f9e6dc892b0bb;p=dotfiles.git

diff --git a/emacs.d/config.org b/emacs.d/config.org
index 0ab4667..d730e3c 100644
--- a/emacs.d/config.org
+++ b/emacs.d/config.org
@@ -313,7 +313,9 @@ Enable rainbow mode in emacs lisp mode
 
 #+END_SRC
 
-** Mode-line
+* Mode-line
+
+** clean mode line
 
 clean mode line, Refer to [[https://www.masteringemacs.org/article/hiding-replacing-modeline-strings][Marstering Emacs]]
 
@@ -342,6 +344,7 @@ clean mode line, Refer to [[https://www.masteringemacs.org/article/hiding-replac
       (hi-lock-mode . "")
       (python-mode . "Py")
       (emacs-lisp-mode . "EL")
+      (eshell-mode . "ε")
       (nxhtml-mode . "nx"))
     "Alist for `clean-mode-line'.
 
@@ -366,6 +369,10 @@ clean mode line, Refer to [[https://www.masteringemacs.org/article/hiding-replac
   (add-hook 'after-change-major-mode-hook 'clean-mode-line)
 #+END_SRC
 
+** Powerline mode
+
+Install powerline mode [[https://github.com/milkypostman/powerline][powerline]]
+
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
   (use-package powerline
     :ensure t
@@ -377,7 +384,11 @@ clean mode line, Refer to [[https://www.masteringemacs.org/article/hiding-replac
   ;;   :ensure t)
   ;; (use-package smart-mode-line-powerline-theme
   ;;   :ensure t)
+#+END_SRC
+
+Revised powerline-center-theme
 
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
   (defun sd/powerline-simpler-vc (s)
     (if s
         (replace-regexp-in-string "Git[:-]" "" s)
@@ -442,6 +453,18 @@ Fix the issue in mode line when showing triangle
   (setq ns-use-srgb-colorspace nil)
 #+END_SRC
 
+set height in mode line
+
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+
+  (custom-set-variables
+   '(powerline-height 14)
+   '(powerline-text-scale-factor 0.8))
+  ;; 100/140
+  (set-face-attribute 'mode-line nil :height 100)
+
+#+END_SRC
+
 * Org-mode Settings
 
 ** Org-mode Basic setting
@@ -518,7 +541,74 @@ cause we cannot input =[= and =]=, so here I unset this mappings. And redifined
 
 #+END_SRC
 
-** Task Management
+** Get Things Done
+
+Refer to [[http://doc.norang.ca/org-mode.html][Organize Your Life in Plain Text]]
+*** basic setup
+
+standard key binding
+
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  (global-set-key "\C-cl" 'org-store-link)
+  (global-set-key "\C-ca" 'org-agenda)
+  (global-set-key "\C-cb" 'org-iswitchb)
+#+END_SRC
+
+*** Plain List 
+
+Replace the list bullet =-=, =+=,  with =•=, a litter change based [[https://github.com/howardabrams/dot-files/blob/master/emacs-org.org][here]]
+
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  (use-package org-mode
+    :init
+    (font-lock-add-keywords 'org-mode
+     '(("^ *\\([-+]\\) "
+            (0 (prog1 () (compose-region (match-beginning 1) (match-end 1) "•")))))))
+#+END_SRC
+ 
+*** Todo Keywords
+
+refer to [[http://coldnew.github.io/coldnew-emacs/#orgheadline94][fancy todo states]], 
+
+To track TODO state changes, the =!= is to insert a timetamp, =@= is to insert a note with
+timestamp for the state change.
+
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+    ;; (setq org-todo-keywords
+    ;;        '((sequence "☛ TODO(t)" "|" "✔ DONE(d)")
+    ;;          (sequence "⚑ WAITING(w)" "|")
+    ;;          (sequence "|" "✘ CANCELLED(c)")))
+  ; (setq org-todo-keyword-faces
+  ;        (quote ("TODO" .  (:foreground "red" :weight bold))
+  ;               ("NEXT" .  (:foreground "blue" :weight bold))
+  ;               ("WAITING" . (:foreground "forest green" :weight bold))
+  ;               ("DONE" .  (:foreground "magenta" :weight bold))
+  ;               ("CANCELLED" . (:foreground "forest green" :weight bold))))
+
+
+  (setq org-todo-keywords
+        (quote ((sequence "TODO(t)" "NEXT(n)" "|" "DONE(d!)")
+                ;; (sequence "WAITING(w@/!)" "HOLD(h@/!)" "|" "CANCELLED(c@/!)" "PHONE" "MEETING")
+                (sequence "WAITING(w@/!)" "HOLD(h@/!)" "|" "CANCELLED(c@/!)" ))))
+
+  (setq org-todo-keyword-faces
+        (quote (("TODO" :foreground "red" :weight bold)
+                ("NEXT" :foreground "blue" :weight bold)
+                ("DONE" :foreground "forest green" :weight bold)
+                ("WAITING" :foreground "orange" :weight bold)
+                ("HOLD" :foreground "magenta" :weight bold)
+                ("CANCELLED" :foreground "forest green" :weight bold)
+                ;; ("MEETING" :foreground "forest green" :weight bold)
+                ;; ("PHONE" :foreground "forest green" :weight bold)
+                )))
+#+END_SRC
+
+*** Agenda Setup
+
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  (setq org-agenda-files (quote ("~/org/plan.org"
+                                 "~/org/test.org")))
+#+END_SRC
 
 ** Capture
 
@@ -611,22 +701,12 @@ Install MacTex-basic and some tex packages
 
 ** others
 
-refer to [[http://coldnew.github.io/coldnew-emacs/#orgheadline94][fancy todo states]]
-
-#+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
-  (setq org-todo-keywords '((sequence "☛ TODO(t)" "|" "✔ DONE(d)")
-                            (sequence "⚑ WAITING(w)" "|")
-                            (sequence "|" "✘ CANCELED(c)")))
-
-#+END_SRC
-
 extend org-mode's easy templates, refer to [[http://coldnew.github.io/coldnew-emacs/#orgheadline94][Extend org-modes' esay templates]]
 
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
 
   (add-to-list 'org-structure-template-alist
-               '("E" "#+BEGIN_SRC emacs-lisp\n?\n#+END_SRC"))
+               '("E" "#+BEGIN_SRC emacs-lisp :tangle yes :results silent\n?\n#+END_SRC"))
   (add-to-list 'org-structure-template-alist
                '("S" "#+BEGIN_SRC sh\n?\n#+END_SRC"))
   (add-to-list 'org-structure-template-alist