Saving pdf-tools+synctex frame code for another life

2 files changed, 14 insertions, 24 deletions

diff --git a/emacs/inits/03-miscload.el b/emacs/inits/03-miscload.el
index 61395fb..054b8b6 100644
--- a/emacs/inits/03-miscload.el
+++ b/emacs/inits/03-miscload.el
@@ -1,13 +1,7 @@
-;; Time-stamp: <2020-03-28 13:00:51 (tslil@bison)>
+;; Time-stamp: <2020-05-09 14:33:11 (tslil@forfeit)>
 
-;;(add-to-list 'load-path (expand-file-name "~/.emacs.d/scripts/"))
-
-(add-to-list 'load-path (expand-file-name "~/.emacs.d/scripts/siege-mode"))
-(autoload 'siege-mode "siege-mode" nil t)
-
-;; (use-package siege-mode
-;;   :defer t
-;;   :load-path "/home/tslil/.emacs.d/scripts/siege-mode/siege-mode.el")
+(use-package siege-mode
+  :load-path "~/.emacs.d/scripts/siege-mode/")
 
 (use-package maxima
   :defer t
diff --git a/emacs/inits/24-latex.el b/emacs/inits/24-latex.el
index cadcd78..f7296c1 100644
--- a/emacs/inits/24-latex.el
+++ b/emacs/inits/24-latex.el
@@ -1,4 +1,4 @@
-;; Time-stamp: <2020-05-04 13:55:07 (tslil@bison)>
+;; Time-stamp: <2020-05-09 14:34:52 (tslil@forfeit)>
 
 (defvar latex-template-dir (expand-file-name "~/academic/typeset/latex-templates"))
 (defun prompt-latex-file-template ()
@@ -19,12 +19,8 @@ populated from the directory *latex-template-dir*"
         (forward-line)
         (save-buffer)))))
 
-;; Why does this not work?
-;; (use-package cdm-mode
-;;   :functions cdm-mode
-;;   :defer t
-;;   :load-path "~/.emacs.d/scripts/")
-(autoload 'cdm-mode "cdm-mode" nil t)
+(use-package cdm-mode
+  :load-path "~/.emacs.d/scripts/")
 
 (use-package company-auctex :ensure t :defer t)
 
@@ -34,8 +30,6 @@ populated from the directory *latex-template-dir*"
   :demand
   :ensure t
   :defer t)
-;; :bind (:map pdf-view-mode-map
-;;             ("C-s" . isearch-forward))
 
 (use-package latex
   :ensure auctex
@@ -69,7 +63,15 @@ populated from the directory *latex-template-dir*"
         (setq TeX-open-quote old-open
               TeX-close-quote old-close))))
 
+  (defun pdf-tools-display-buffer-use-some-frame (fun &rest args)
+    (let ((display-buffer-overriding-action '(display-buffer-use-some-frame)))
+      (apply fun args)))
+
   :config
+  ;; Make synctex and pdf-tools understand multiple frames
+  ;; (advice-add 'pdf-sync-backward-search-mouse :around #'pdf-tools-display-buffer-use-some-frame)
+  ;; (advice-add 'pdf-sync-forward-search :around #'pdf-tools-display-buffer-use-some-frame)
+
   (dolist (entry '(("diagram") ("vdiagram") ("diagram*") ("vsubdiagram") ("vsubdiagrams"))) (push entry LaTeX-indent-environment-list))
 
   (setq TeX-command-list '(("XeLaTeX" "xelatex %t"
@@ -159,9 +161,3 @@ populated from the directory *latex-template-dir*"
                                     (?{ ("\\subseteq" "\\subsetneq"))
                                     (?} ("\\supseteq" "\\supsetneq"))
                                     )))
-;; (use-package doc-view
-;;   :defer t
-;;   :functions doc-view-mode
-;;   :hook (doc-view-mode . auto-revert-mode)
-;;   :config   (setq doc-view-resolution 300
-;;                   doc-view-continuous t))