projects / dotfiles.git / blobdiff
? search:
summary | shortlog | log | commit | commitdiff | tree
raw | inline | side by side
emacs - change org-bulltes list
[dotfiles.git] / emacs.d / config.org
diff --git a/emacs.d/config.org b/emacs.d/config.org
index 1f92827..b40e40e 100644 (file)
--- a/emacs.d/config.org
+++ b/emacs.d/config.org
@@ -49,7 +49,6 @@ Set the emacs load path
 Disable scroll bar, tool-bar and menu-bar
 
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
   (scroll-bar-mode 0)
   (tool-bar-mode 0)
   (menu-bar-mode 1)
@@ -59,9 +58,8 @@ Disable scroll bar, tool-bar and menu-bar
 
   (defalias 'yes-or-no-p 'y-or-n-p)
   (show-paren-mode 1)
-
-
-
+  ;; don't backupf
+  (setq make-backup-files nil)
 #+END_SRC
 
 set custom file 
@@ -82,6 +80,12 @@ Switch the focus to help window when it appears
 
 #+END_SRC
 
+Setting scroll right/left
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  ;  (global-set-key (kbd "C-,") 'scoll-left)
+  ;  (global-set-key (kbd "C-.") 'scoll-right)
+#+END_SRC
+
 * Package Management Tools
 
 ** Use-package
@@ -151,7 +155,7 @@ syntax highlighting
   (if window-system
       (defvar sd/fixed-font-family
         (cond ((x-list-fonts "Hasklig")         "Hasklig")
-              ((x-list-fonts "Source Code Pro") "Source Code Pro")
+              ((x-list-fonts "Source Code Pro") "Source Code Pro:weight:light")
               ((x-list-fonts "Anonymous Pro")   "Anonymous Pro")
               ((x-list-fonts "M+ 1mn")          "M+ 1mn"))
         "The fixed width font based on what is installed, `nil' if not defined."))
@@ -165,7 +169,7 @@ Setting the fonts
   (if window-system
       (when sd/fixed-font-family
         (set-frame-font sd/fixed-font-family)
-        (set-face-attribute 'default nil :font sd/fixed-font-family :height 140)
+        (set-face-attribute 'default nil :font sd/fixed-font-family :height 130)
         (set-face-font 'default sd/fixed-font-family)))
 
 #+END_SRC
@@ -509,7 +513,6 @@ Always indents header, and hide header leading starts so that no need type =#+ST
 use [[https://github.com/sabof/org-bullets][org-bullets]] package to show utf-8 charactes
 
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
   (use-package org-bullets
     :ensure t
     :init
@@ -517,6 +520,7 @@ use [[https://github.com/sabof/org-bullets][org-bullets]] package to show utf-8
               (lambda ()
                 (org-bullets-mode t))))
 
+  (setq org-bullets-bullet-list '("⦿" "✪" "◉" "○" "►" "◆"))
 #+END_SRC
 
 ** Worf Mode
@@ -559,11 +563,11 @@ standard key binding
 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) "•")))))))
+  ;; (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
@@ -630,6 +634,30 @@ This tags are used to filter tasks in agenda views
                 ("DONE" ("WAITING") ("CANCELLED") ("HOLD")))))
 #+END_SRC
 
+Logging Stuff 
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  ;; log time when task done
+  ;; (setq org-log-done (quote time))
+  ;; save clocking into to LOGBOOK
+  (setq org-clock-into-drawer t)
+  ;; save state change notes and time stamp into LOGBOOK drawer
+  (setq org-log-into-drawer t)
+#+END_SRC
+
+*** Tags
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  (setq org-tag-alist (quote ((:startgroup)
+                              ("@office" . ?e)
+                              ("@home" . ?h)
+                              (:endgroup)
+                              ("WAITING" . ?w)
+                              ("HOLD" . ?h)
+                              ("CANCELLED" . ?c))))
+
+  ;; Allow setting single tags without the menu
+  (setq org-fast-tag-selection-single-key (quote expert))
+#+END_SRC
+
 *** Capture - Refile - Archive
 
 Capture lets you quickly store notes with little interruption of your work flow.
@@ -653,13 +681,13 @@ All captured file which need next actions are stored in =refile.org=,
 
   (setq org-capture-templates
         (quote (("t" "Todo" entry (file org-default-notes-file)
-                 "* TODO %?\n%a\n" :clock-in t :clock-resume t)
+                 "* TODO %?\n:LOGBOOK:\n- Added: %U\t\tAt: %a\n:END:")
                 ("n" "Note" entry (file org-default-notes-file)
-                 "* %? :NOTE:\n%a\n" :clock-in t :clock-resume t)
+                 "* %? :NOTE:\n:LOGBOOK:\n- Added: %U\t\tAt: %a\n:END:")
                 ("j" "Journal" entry (file+datetree sd/org-diary-file)
-                 "* %?\n" :clock-in t :clock-resume t)
+                 "* %?\n:LOGBOOK:\n:END:" :clock-in t :clock-resume t)
                 ("h" "Habit" entry (file org-default-notes-file)
-                 "* NEXT %?\n%a\nSCHEDULED: %(format-time-string \"%<<%Y-%m-%d %a .+1d/3d>>\")\n:PROPERTITES:\n:STYLE: habit\n:REPEAT_TO_STATE: NEXT\n:END:\n "))))
+                 "* NEXT %?\n:LOGBOOK:\n%a\nSCHEDULED: %(format-time-string \"%<<%Y-%m-%d %a .+1d/3d>>\")\n:END:\n:PROPERTIES:\n:STYLE: habit\n:REPEAT_TO_STATE: NEXT\n:END:\n "))))
 #+END_SRC
 
 **** Refiling Tasks
@@ -672,14 +700,25 @@ All captured file which need next actions are stored in =refile.org=,
 
   (setq org-refile-allow-creating-parent-nodes (quote confirm))
 #+END_SRC
-*** Agenda Setup
 
+*** Agenda Setup
+Setting agenda files and the agenda view
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-  (setq org-agenda-files (quote ("~/org/plan.org"
-                                 "~/org/test.org")))
-#+END_SRC
+  (setq org-agenda-files (quote ("~/org/gtd.org"
+                                 "~/org/work.org")))
+
+  ;; only show today's tasks in agenda view
+  (setq org-agenda-span 'day)
+  ;; Use current windows for agenda view
+  (setq org-agenda-window-setup 'current-window)
+
+  ;; show all feature entries for repeating tasks,
+  ;; this is already setting by default
+  (setq org-agenda-repeating-timestamp-show-all t)
 
-** Capture
+  ;; Show all agenda dates - even if they are empty
+  (setq org-agenda-show-all-dates t)
+#+END_SRC
 
 ** Export PDF
 
@@ -1151,7 +1190,6 @@ Eshell alias
 Quickly start eshll in split window below, refer [[http://www.howardism.org/Technical/Emacs/eshell-fun.html][eshell-here]]
 
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
   (defun eshell-x ()
     (insert "exit")
     (eshell-send-input)
@@ -1184,7 +1222,6 @@ Quickly start eshll in split window below, refer [[http://www.howardism.org/Tech
   ;; (global-set-key (kbd "M-`") (lambda ()
   ;;                               (interactive)
   ;;                               (if (buffer-name))))
-
 #+END_SRC
 
 * Misc Settings
My dot rc files(emacs, vim, tmux, zsh, ...)