From 4b318c2348bc1976798f51b5162325b1fe6a5aac Mon Sep 17 00:00:00 2001
From: JaeYoo-Im <cpu3792@gmail.com>
Date: Mon, 11 Oct 2021 18:47:19 +0900
Subject: [PATCH] Emacs : pdf tool setting

---
 .emacs.d/emacs.org          | 48 ++++++++++++++++++++++---------------
 .emacs.d/exwm/start-exwm.sh |  4 ++--
 scripts/init_script_wsl.sh  | 10 ++++++++
 3 files changed, 41 insertions(+), 21 deletions(-)

diff --git a/.emacs.d/emacs.org b/.emacs.d/emacs.org
index 82588f8..5c8c29b 100644
--- a/.emacs.d/emacs.org
+++ b/.emacs.d/emacs.org
@@ -997,6 +997,16 @@ https://emacs.stackexchange.com/a/30691
 
 ** Org Noter
 #+begin_src emacs-lisp
+  (use-package pdf-tools
+    :straight t
+    :config
+    (pdf-tools-install)
+    (setq-default pdf-view-display-size 'fit-width)
+    (define-key pdf-view-mode-map (kbd "C-s") 'isearch-forward)
+    :custom
+    (pdf-annot-activate-created-annotations t "automatically annotate highlights"))
+  (use-package org-pdfview
+    :straight t)
   (use-package org-noter)
 #+end_src
 * Magit
@@ -1245,10 +1255,10 @@ https://emacs.stackexchange.com/a/30691
                          "ogm" "ogg" "mkv"))
                       "mpv"
                       '(file)))))
-  ;;(list (openwith-make-extension-regexp
-  ;;       '("pdf"))
-  ;;      "evince"
-  ;;      '(file)))))
+                ;;(list (openwith-make-extension-regexp
+                ;;       '("pdf"))
+                ;;      "evince"
+                ;;      '(file)))))
 #+end_src
 * VLF (very large file)
 #+begin_src emacs-lisp
@@ -1368,21 +1378,21 @@ using =svlangserver=
 * ETC
 ** Youtube
 #+begin_src emacs-lisp
-  ;;(use-package ytel
-    ;;:straight t
-    ;;:config
-    ;;(setq ytel-invidious-api-url "https://invidious.snopyta.org")
-    ;;)
-  ;;(defun ytel-watch ()
-    ;;"Stream video at point in mpv."
-    ;;(interactive)
-    ;;(let* ((video (ytel-get-current-video))
-           ;;(id    (ytel-video-id video)))
-      ;;(start-process "ytel mpv" nil
-                     ;;"mpv"
-                     ;;(concat "https://www.youtube.com/watch?v=" id))
-      ;;"--ytdl-format=bestvideo[height<=?720]+bestaudio/best")
-    ;;(message "Starting streaming..."))
+  (use-package ytel
+    :straight t
+    :config
+    (setq ytel-invidious-api-url "https://invidious.snopyta.org")
+    )
+  (defun ytel-watch ()
+    "Stream video at point in mpv."
+    (interactive)
+    (let* ((video (ytel-get-current-video))
+           (id    (ytel-video-id video)))
+      (start-process "ytel mpv" nil
+                     "mpv"
+                     (concat "https://www.youtube.com/watch?v=" id))
+      "--ytdl-format=bestvideo[height<=?720]+bestaudio/best")
+    (message "Starting streaming..."))
 #+end_src
 ** Python
 
diff --git a/.emacs.d/exwm/start-exwm.sh b/.emacs.d/exwm/start-exwm.sh
index 3566a6a..0064796 100755
--- a/.emacs.d/exwm/start-exwm.sh
+++ b/.emacs.d/exwm/start-exwm.sh
@@ -8,7 +8,7 @@
 # Enable screen locking on suspend
 #xss-lock -- slock &
 # Fire it up for WSL
-#VETHER_IP=$(/bin/grep nameserver /etc/resolv.conf 2> /dev/null | /bin/tr -s ' ' | /bin/cut -d' ' -f2)
-#export DISPLAY=$VETHER_IP:10.0
+VETHER_IP=$(/bin/grep nameserver /etc/resolv.conf 2> /dev/null | /bin/tr -s ' ' | /bin/cut -d' ' -f2)
+export DISPLAY=$VETHER_IP:10.0
 picom -b --config $HOME/.xmonad/scripts/picom.conf &
 exec dbus-launch --exit-with-session emacs -mm --debug-init -l ~/.emacs.d/desktop.el
diff --git a/scripts/init_script_wsl.sh b/scripts/init_script_wsl.sh
index c7fafe1..3ad3065 100755
--- a/scripts/init_script_wsl.sh
+++ b/scripts/init_script_wsl.sh
@@ -53,3 +53,13 @@ pip install matplotlib numpy pandas tabulate
 # verilog lsp
 paru -S verilator --noconfirm
 npm install -g @imc-trading/svlangserver
+
+##################################################
+# EXWM
+##################################################
+paru -S picom --noconfirm
+
+paru -S xorg-xrandr feh cronie --noconfirm
+git clone https://github.com/adi1090x/dynamic-wallpaper.git
+cd dynamic-wallpaper
+./install.sh