]> git.donarmstrong.com Git - lib.git/commitdiff
re-enable eyebrowse
authorDon Armstrong <don@donarmstrong.com>
Wed, 17 Jan 2018 00:04:54 +0000 (16:04 -0800)
committerDon Armstrong <don@donarmstrong.com>
Wed, 17 Jan 2018 00:04:54 +0000 (16:04 -0800)
emacs_el/configuration/don-configuration.org

index 2f3d1ce282300936955489f6984ff358fc72092e..d2b33c0bbb825fc97e0d985189fcb0eab026d4c8 100644 (file)
@@ -135,48 +135,48 @@ load  [[https://github.com/jwiegley/use-package/][use-package]] even faster
 ** Eyebrowse
 
 #+BEGIN_SRC emacs-lisp
 ** Eyebrowse
 
 #+BEGIN_SRC emacs-lisp
-  ;; (use-package eyebrowse
-  ;;   :ensure t
-  ;;   :diminish eyebrowse-mode
-  ;;   :init (setq eyebrowse-keymap-prefix (kbd "C-c C-\\"))
-  ;;   :config (progn
-  ;;             (setq eyebrowse-wrap-around t)
-  ;;             (eyebrowse-mode t)
-  ;; 
-  ;;             (defun my/eyebrowse-new-window-config ()
-  ;;               (interactive)
-  ;;               (let ((done nil))
-  ;;                 (dotimes (i 10)
-  ;;                   ;; start at 1 run till 0
-  ;;                   (let ((j (mod (+ i 1) 10)))
-  ;;                     (when (and (not done)
-  ;;                                (not (eyebrowse--window-config-present-p j)))
-  ;;                       (eyebrowse-switch-to-window-config j)
-  ;;                       (call-interactively 'eyebrowse-rename-window-config2 j)
-  ;;                       (setq done t)
-  ;;                       ))
-  ;;                   )))
-  ;; 
-  ;;             ;; I don't use latex-preview-pane
-  ;;             ;; (require 'latex-preview-pane)
-  ;;             ;; (defun my/close-latex-preview-pane-before-eyebrowse-switch ()
-  ;;             ;;   ;; latex-preview-pane uses window-parameters which are
-  ;;             ;;   ;; not preserved by eyebrowse, so we close the preview
-  ;;             ;;   ;; pane before switching, it will be regenerated when we
-  ;;             ;;   ;; edit the TeX file.
-  ;;             ;;   (when (lpp/window-containing-preview)
-  ;;             ;;     (delete-window (lpp/window-containing-preview))))
-  ;; 
-  ;;             ;; (add-to-list 'eyebrowse-pre-window-switch-hook
-  ;;             ;;              #'my/close-latex-preview-pane-before-eyebrowse-switch)
-  ;; 
-  ;;             ;; (my/set-menu-key "["  #'my/eyebrowse-new-window-config)
-  ;;             ;; (my/set-menu-key ";"  #'eyebrowse-prev-window-config)
-  ;;             ;; (my/set-menu-key "'"  #'eyebrowse-next-window-config)
-  ;;             ;; (my/set-menu-key "]"  #'eyebrowse-close-window-config)
-  ;;             ;; (my/set-menu-key "\\" #'eyebrowse-rename-window-config)
-  ;;             )
-  ;;   )
+  (use-package eyebrowse
+    :ensure t
+    :diminish eyebrowse-mode
+    :init (setq eyebrowse-keymap-prefix (kbd "C-c e"))
+    :config (progn
+              (setq eyebrowse-wrap-around t)
+              (eyebrowse-mode t)
+
+              (defun my/eyebrowse-new-window-config ()
+                (interactive)
+                (let ((done nil))
+                  (dotimes (i 10)
+                    ;; start at 1 run till 0
+                    (let ((j (mod (+ i 1) 10)))
+                      (when (and (not done)
+                                 (not (eyebrowse--window-config-present-p j)))
+                        (eyebrowse-switch-to-window-config j)
+                        (call-interactively 'eyebrowse-rename-window-config2 j)
+                        (setq done t)
+                        ))
+                    )))
+
+              ;; I don't use latex-preview-pane
+              ;; (require 'latex-preview-pane)
+              ;; (defun my/close-latex-preview-pane-before-eyebrowse-switch ()
+              ;;   ;; latex-preview-pane uses window-parameters which are
+              ;;   ;; not preserved by eyebrowse, so we close the preview
+              ;;   ;; pane before switching, it will be regenerated when we
+              ;;   ;; edit the TeX file.
+              ;;   (when (lpp/window-containing-preview)
+              ;;     (delete-window (lpp/window-containing-preview))))
+
+              ;; (add-to-list 'eyebrowse-pre-window-switch-hook
+              ;;              #'my/close-latex-preview-pane-before-eyebrowse-switch)
+
+              ;; (my/set-menu-key "["  #'my/eyebrowse-new-window-config)
+              ;; (my/set-menu-key ";"  #'eyebrowse-prev-window-config)
+              ;; (my/set-menu-key "'"  #'eyebrowse-next-window-config)
+              ;; (my/set-menu-key "]"  #'eyebrowse-close-window-config)
+              ;; (my/set-menu-key "\\" #'eyebrowse-rename-window-config)
+              )
+    )
 #+END_SRC
 
 ** Window handling
 #+END_SRC
 
 ** Window handling