emacs - continue previous commit
[dotfiles.git] / emacs.d / config.org
index d99baae..041cf06 100644 (file)
@@ -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
@@ -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
@@ -683,9 +711,15 @@ Setting agenda files and the 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)
+
+  ;; Show all agenda dates - even if they are empty
+  (setq org-agenda-show-all-dates t)
 #+END_SRC
 
-** Capture
 
 ** Export PDF