emacs - should not remap "C-k" in ido common completion map
[dotfiles.git] / emacs.d / config.org
index 7fdcd45..9bba051 100644 (file)
@@ -25,9 +25,7 @@ Set system PATH and emacs exec path
 Set the emacs load path
 
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
-  (add-to-list 'load-path "~/.emacs.d/elisp")
-
+  ;; (add-to-list 'load-path "~/.emacs.d/elisp")
 #+END_SRC
 
 ** Package Initialization
@@ -53,7 +51,7 @@ Disable scroll bar, tool-bar and menu-bar
   (tool-bar-mode 0)
   (menu-bar-mode 1)
 
-  (setq debug-on-error t)
+  ;; (setq debug-on-error t)
   (setq inhibit-startup-message t)
 
   (defalias 'yes-or-no-p 'y-or-n-p)
@@ -520,16 +518,13 @@ set height in mode line
 #+END_SRC
 
 ** IDO-vertically
-
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
   (use-package ido-vertical-mode
     :ensure t
     :init
     (setq ido-vertical-define-keys 'C-n-C-p-up-and-down)
     :config
     (ido-vertical-mode 1))
-
 #+END_SRC
 
 ** SMEX
@@ -562,17 +557,18 @@ Use [[https://github.com/DarwinAwardWinner/ido-ubiquitous][ido-ubiquitous]] for
 #+END_SRC
 
 ** Ido-exit-target
-
 [[https://github.com/waymondo/ido-exit-target][ido-exit-target]] let you open file/buffer on =other-windows= when call =ido-switch-buffer=
-
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-
   (use-package ido-exit-target
     :ensure t
     :init
-    (define-key ido-common-completion-map (kbd "C-j") #'ido-exit-target-split-window-right)
-    (define-key ido-common-completion-map (kbd "C-l") #'ido-exit-target-split-window-below))
-
+    (mapcar (lambda (map)
+              (define-key map (kbd "C-j") #'ido-exit-target-split-window-right)
+              (define-key map (kbd "C-k") #'ido-exit-target-split-window-below))
+            (list ido-buffer-completion-map
+                  ;; ido-common-completion-map
+                  ido-file-completion-map
+                  ido-file-dir-completion-map)))
 #+END_SRC
 
 * Normal Text Operation
@@ -1506,6 +1502,7 @@ Refer [[https://github.com/abo-abo/hydra/blob/master/hydra-examples.el][hydra-ex
     ("C-'" mode-line-other-buffer "last buffer" :exit t)
     ("m" man "man" :exit t)
     ("d" dired-jump "dired" :exit t)
+    ("b" ibuffer "ibuffer" :exit t)
     ("q" nil "quit")
     ("f" nil "quit"))
 
@@ -1783,14 +1780,41 @@ Color for Man-mode
   ;; (set-default-coding-systems 'utf-8)
 #+END_SRC
 
+** Demo It
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  ;; (el-get-bundle howardabrams/demo-it)
+
+  (use-package org-tree-slide
+    :ensure t)
+
+  ;; (use-package yasnippet
+  ;;   :ensure t)
+#+END_SRC
+
+** Presentation
+#+BEGIN_SRC emacs-lisp :tangle yes :results silent
+  (use-package org-tree-slide
+    :ensure
+    :config
+    ;; (define-key org-mode-map "\C-ccp" 'org-tree-slide-mode)
+    (define-key org-tree-slide-mode-map (kbd "<ESC>") 'org-tree-slide-content)
+    (define-key org-tree-slide-mode-map (kbd "<SPACE>") 'org-tree-slide-move-next-tree)
+    (define-key org-tree-slide-mode-map [escape] 'org-tree-slide-move-previous-tree))
+#+END_SRC
+
 * dired
 =C-o= is defined as a global key for window operation, here unset it in dired mode
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-  (add-hook 'dired-mode-hook (lambda ()
-                               (local-unset-key (kbd "C-o"))
-                               (local-set-key (kbd "o") 'dired-display-file)))
-
-  (define-key dired-mode-map (kbd "DEL") (lambda () (interactive) (find-alternate-file "..")))
+  (use-package dired
+    :config
+    (require 'dired-x)
+    (setq dired-omit-mode t)
+    (setq dired-omit-files (concat dired-omit-files "\\|^\\..+$"))
+    (add-hook 'dired-mode-hook (lambda ()
+                                 (define-key dired-mode-map (kbd "C-o") nil)
+                                 (define-key dired-mode-map (kbd "H") 'dired-omit-mode)
+                                 (define-key dired-mode-map (kbd "DEL") (lambda () (interactive) (find-alternate-file "..")))
+                                 (dired-omit-mode))))
 #+END_SRC
 
 Dired+