emacs - magit keybindings vi-like
[dotfiles.git] / emacs.d / config.org
index 5a5582d..543d387 100644 (file)
@@ -513,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
@@ -521,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
@@ -563,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
@@ -634,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.
@@ -657,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
@@ -687,9 +711,14 @@ 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)
-#+END_SRC
 
-** Capture
+  ;; 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
 
 ** Export PDF
 
@@ -805,6 +834,20 @@ extend org-mode's easy templates, refer to [[http://coldnew.github.io/coldnew-em
 
 #+END_SRC
 
+Defined keys, using vi keybindings, Refer abo-abo's setting [[https://github.com/abo-abo/oremacs/blob/c5cafdcebc88afe9e73cc8bd40c49b70675509c7/modes/ora-nextmagit.el][here]]
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  (dolist (map (list magit-status-mode-map
+                     magit-log-mode-map
+                     magit-diff-mode-map
+                     magit-staged-section-map))
+    (define-key map "j" 'magit-section-forward)
+    (define-key map "k" 'magit-section-backward)
+    (define-key map "n" nil)
+    (define-key map "p" nil)
+    (define-key map "v" 'recenter-top-bottom)
+    (define-key map "i" 'magit-section-toggle))
+#+END_SRC
+
 * IDO & SMEX
 
 ** IDO
@@ -1161,7 +1204,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)
@@ -1194,7 +1236,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
@@ -1202,21 +1243,20 @@ Quickly start eshll in split window below, refer [[http://www.howardism.org/Tech
 ** [[https://github.com/abo-abo/hydra][Hydra]]
 
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
   (use-package hydra
     :ensure t)
-
+  ;; disable new line in minibuffer when hint hydra
+  (setq hydra-lv nil)
 #+END_SRC
 
 *** Font Zoom
 
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
+    (defhydra sd/font-zoom (global-map "<f2>")
 
-  (defhydra sd/font-zoom (global-map "<f2>")
     "zoom"
     ("g" text-scale-increase "in")
     ("l" text-scale-decrease "out"))
-
 #+END_SRC
 
 *** Windmove Splitter
@@ -1262,7 +1302,6 @@ Refer [[https://github.com/abo-abo/hydra/blob/master/hydra-examples.el][hydra-ex
 *** hydra-window
 
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
   (winner-mode 1)
 
   (defhydra sd/hydra-window (:color red :columns nil)
@@ -1291,14 +1330,14 @@ Refer [[https://github.com/abo-abo/hydra/blob/master/hydra-examples.el][hydra-ex
     ("d" ace-delete-window "ace-one" :exit t)
     ("i" ace-maximize-window "ace-one" :exit t)
     ("b" ido-switch-buffer "buf")
-    ("m" headlong-bookmark-jump "bmk")
+    ;; ("m" headlong-bookmark-jump "bmk")
     ("q" nil "cancel")
     ("u" (progn (winner-undo) (setq this-command 'winner-undo)) "undo")
     ("r" (progn (winner-redo) (setq this-command 'winner-redo)) "redo")
     ("f" nil))
 
-  (global-unset-key (kbd "M-o"))
-  (global-set-key (kbd "M-o") 'sd/hydra-window/body)
+  (global-unset-key (kbd "C-o"))
+  (global-set-key (kbd "C-o") 'sd/hydra-window/body)
 
   (defun triggle-windows-max-size ()
     (interactive)