X-Git-Url: http://47.100.26.94:8080/?a=blobdiff_plain;f=emacs.d%2Fconfig.org;h=1b0eb737637c247604943e93a8daa753c6febcbc;hb=5f3746291aaee99386c4dd11f261aa6dce075c06;hp=a4bf6c7d2fa07233e531565aec4df10fc5e8fdbb;hpb=5caacc9aa4a2f45c0fbb3acaf529d6d53e0b36ef;p=dotfiles.git

diff --git a/emacs.d/config.org b/emacs.d/config.org
index a4bf6c7..1b0eb73 100644
--- a/emacs.d/config.org
+++ b/emacs.d/config.org
@@ -904,9 +904,7 @@ Setting agenda files and the agenda view
 #+END_SRC
 
 ** Export PDF
-
 Install MacTex-basic and some tex packages
-
 #+BEGIN_SRC bash 
 
   sudo tlmgr update --self
@@ -1412,7 +1410,16 @@ Color for Man-mode
     ;; run to complete the installation
     (pdf-tools-install)
     :config
-    (add-to-list 'auto-mode-alist '("\.pdf$" . pdf-view-mode)))
+    (add-to-list 'auto-mode-alist '("\.pdf$" . pdf-view-mode))
+    (add-hook 'pdf-outline-buffer-mode-hook #'sd/pdf-outline-map))
+
+  (defun sd/pdf-outline-map ()
+    "My keybindings in pdf-outline-map"
+    (interactive)
+    (define-key pdf-outline-buffer-mode-map (kbd "C-o") nil)
+    (define-key pdf-outline-buffer-mode-map (kbd "i") 'outline-toggle-children)
+    (define-key pdf-outline-buffer-mode-map (kbd "j") 'next-line)
+    (define-key pdf-outline-buffer-mode-map (kbd "k") 'previous-line))
 #+END_SRC
 
 * Dired
@@ -2247,7 +2254,11 @@ toggle the mark ring. the best way is add a new action and mapping to =helm-sour
 since there is no map such as =helm-mark-ring=map=, so I cannot binding a key to the quit action.
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
   (setq mark-ring-max 50)
-  (global-set-key (kbd "M-`") #'helm-mark-ring)
+
+  (use-package helm
+    :ensure t
+    :init
+    (global-set-key (kbd "M-`") #'helm-mark-ring))
 
   (define-key minibuffer-local-map (kbd "M-`") 'keyboard-escape-quit)
 #+END_SRC
@@ -2306,10 +2317,8 @@ Search, replace and hightlight will in later paragraph
 
 *** =Imenu= goto tag
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
-  ;; (global-set-key (kbd "M-i") #'counsel-imenu)
-  (global-set-key (kbd "M-i") #'imenu)
-
-  ;; (global-set-key (kbd "M-l") 'goto-line)
+  (global-set-key (kbd "M-i") #'counsel-imenu)
+  ;; (global-set-key (kbd "M-i") #'imenu)
 #+END_SRC
 
 *** Go-to line
@@ -2329,7 +2338,11 @@ Search, replace and hightlight will in later paragraph
 =helm-show-kill-ring=
 #+BEGIN_SRC emacs-lisp :tangle yes :results silent
   (setq kill-ring-max 100)                ; default is 60p
-  (global-set-key (kbd "M-y") #'helm-show-kill-ring)
+
+  (use-package helm
+    :ensure t
+    :init
+    (global-set-key (kbd "M-y") #'helm-show-kill-ring))
 #+END_SRC
 
 *** undo-tree