Emacs : migration done.

.config/emacs/emacs.org

@@ -170,8 +170,8 @@ Emacs Configuration for emacs 29.50
   (require 'custom-latex)
   (require 'custom-org)
   ;;(require 'custom-workspaces)
-  ;;(require 'custom-languages)
+  (require 'custom-languages)
-  ;;(require 'custom-extra)
+  (require 'custom-extra)
 
   ;;; config.el ends here
 #+end_src
@@ -1065,7 +1065,7 @@ my-blog jaeus.net
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-org.el
   (use-package ox-hugo
     :straight (:build t)
-    :defer t)
+    :after ox)
 #+end_src
 ***** TODO Engrave-faces
 latex export code block
@@ -1389,7 +1389,7 @@ speed-up insertion of environments and math templates.
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-latex.el
   (use-package latex-preview-pane
     :straight (:build t)
-    :defer t)
+    :ensure t)
 #+end_src
 **** Provide Modules
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-latex.el
@@ -1399,10 +1399,12 @@ speed-up insertion of environments and math templates.
 *** Extra
 **** Helpful
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'helpful)
+  (use-package helpful
-  (customize-set-variable 'counsel-describe-function-function #'helpful-callable)
+    :straight (:build t)
-  (customize-set-variable 'counsel-describe-variable-function #'helpful-variable)
+    :defer t
-  (require 'helpful)
+    :custom
+    (counsel-describe-function-function #'helpful-callable)
+    (counsel-describe-variable-function #'helpful-variable))
   ;;:commands (helpful-callable helpful-variable helpful-command helpful-key)
   (global-set-key [remap describe-function] #'describe-function)
   (global-set-key [remap describe-command] #'helpful-command)
@@ -1411,8 +1413,11 @@ speed-up insertion of environments and math templates.
 #+end_src
 **** Avy
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'avy)
+  (use-package avy
-  (setq avy-all-windows t)
+    :straight (:build t)
+    :defer t
+    :config
+    (setq avy-all-windows t))
   (ju/leader-key-def
     "v" '(:ignore t :which-key "Avy")
     "vc" '(avy-goto-char :which-key "Avy Goto Char")
@@ -1421,74 +1426,94 @@ speed-up insertion of environments and math templates.
 #+end_src
 **** Snippet
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'yasnippet)
+  (use-package yasnippet
-  (usr-package-install 'yasnippet-snippets)
+    :straight (:build t)
+    :defer t
+    :hook (prog-mode . yas-minor-mode)
+    :config
   (defvar yas-snippet-dirs nil)
-  (add-hook 'prog-mode-hook #'yas-minor-mode)
   (add-to-list 'yas-snippet-dirs "~/.config/emacs/snippets")
-  (yas-global-mode 1)
+  (yas-global-mode 1))
   (ju/leader-key-def
     "i s" '(yas-insert-snippet :which-key "snippet"))
 #+end_src
 **** Emojify
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'emojify)
+  (use-package emojify
-  (global-emojify-mode 1)
+    :straight (:build t)
+    :defer t
+    :init (global-emojify-mode 1))
   (ju/leader-key-def
     "i e" '(emojify-insert-emoji :which-key "emoji"))
 #+end_src
 **** PDF Tool
 enhanced PDF viewer on emacs
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'pdf-tools)
+  (use-package pdf-tools
-  (require 'pdf-tools)
+    :defer t
-  (pdf-tools-install)
+    :config
-  (setq-default pdf-view-display-size 'fit-width)
+    ;;(pdf-tools-install)
+    (setq-default pdf-view-display-size 'fit-width))
 #+end_src
 **** PDF view restore
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'pdf-view-restore)
+  (use-package pdf-view-restore
-  (add-hook 'pdf-view-mode-hook #'pdf-view-restore-mode)
+    :straight (:build t)
-  (setq pdf-view-restore-filename (expand-file-name ".tmp/pdf-view-restore"
+    :defer t
-                                                    user-emacs-directory))
+    :hook (pdf-view-mode . pdf-view-restore-mode)
+    :config
+    (setq pdf-view-restore-filename (expand-file-name ".tmp/pdf-view-restore"
+                                                      user-emacs-directory)))
 #+end_src
 **** Nov
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'nov)
+  (use-package nov
-  (add-to-list 'auto-mode-alist '("\\.epub\\'" . nov-mode))
+    :straight (:build t)
+    :defer t
+    :config
+  (add-to-list 'auto-mode-alist '("\\.epub\\'" . nov-mode)))
 #+end_src
 **** Openwith
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'openwith)
+  (use-package openwith
-  (setq larget-file-warning-threshold nil)
+    :straight (:build t)
-  (openwith-mode t)
+    :defer t
-  (setq openwith-associations
+    :config
-        (list (list (openwith-make-extension-regexp
+    (openwith-mode t)
-                     '("mpg" "mpeg" "mp3" "mp4" "m4v"
+    (setq larget-file-warning-threshold nil)
-                       "avi" "wmv" "wav" "mov" "flv"
+    (setq openwith-associations
-                       "ogm" "ogg" "mkv"))
+          (list (list (openwith-make-extension-regexp
-                    "mpv"
+                       '("mpg" "mpeg" "mp3" "mp4" "m4v"
-                    '(file))))
+                         "avi" "wmv" "wav" "mov" "flv"
-                ;;(list (openwith-make-extension-regexp
+                         "ogm" "ogg" "mkv"))
-                ;;       '("html" "htm"))
+                      "mpv"
-                ;;      "qutebrowser"
+                      '(file)))))
-                ;;      '(file))))
+  ;;(list (openwith-make-extension-regexp
+  ;;       '("html" "htm"))
+  ;;      "qutebrowser"
+  ;;      '(file))))
 #+end_src
 **** Calfw
 calendar
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'calfw)
+  (use-package calfw
-  (usr-package-install 'calfw-org)
+    :straight (:build t)
+    :defer t)
 #+end_src
 **** ELFEED
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
-  (usr-package-install 'elfeed)
+  (use-package elfeed
-  (usr-package-install 'elfeed-goodies)
+    :straight (:build t)
-  (usr-package-install 'elfeed-org)
+    :defer t)
-
+  (use-package elfeed-goodies
-  (require 'elfeed-org)
+    :straight (:build t)
-  (elfeed-org)
+    :defer t)
-  (setq rmh-elfeed-org-files (list (expand-file-name "elfeed.org" user-emacs-directory)))
+  (use-package elfeed-org
+    :straight (:build t)
+    :defer t
+    :config
+    (elfeed-org)
+    (setq rmh-elfeed-org-files (list (expand-file-name "elfeed.org" user-emacs-directory))))
 #+end_src
 **** Provide Modules
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
@@ -1524,75 +1549,94 @@ calendar
 #+end_src
 **** Treesitter
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (if (version< emacs-version "29")
+  ;;(if (version< emacs-version "29")
-      (progn
+  ;;(use-package tree-sitter
-        (usr-package-install 'tree-sitter)
+  ;;  :straight (:build t)
-        (usr-package-install 'tree-sitter-langs)
+  ;;  :defer t
-        (require 'tree-sitter)
+  ;;  :init (global-tree-sitter-mode))
-        (global-tree-sitter-mode)))
+  ;;(use-package tree-sitter-langs
+  ;;  :straight (:build t)
+  ;;  :defer t
+  ;;  :after tree-sitter))
 #+end_src
 **** eglot
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
   (if (version< emacs-version "29")
-      (usr-package-install 'eglot))
+      (use-package eglot
+        :straight (:build t)
+        :defer t))
 #+end_src
 **** Rust
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'rust-mode)
+  (use-package rust-mode
+    :straight (:build t)
+    :defer t)
 #+end_src
 **** Python
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'jupyter)
+  (use-package jupyter
-  (setq org-babel-jupyter-override-src-block "python")
+    :straight (:build t)
+    :defer t
+    :config
+    (setq org-babel-jupyter-override-src-block "python"))
 #+end_src
 **** CMAKE
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'cmake-mode)
+  ;;(use-package cmake-mode
+  ;;  :straight (:build t)
+  ;;  :defer t)
 #+end_src
 
 **** Haskell
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'haskell-mode)
+  (use-package haskell-mode
+    :straight (:build t)
+    :defer t)
 #+end_src
 **** Markdown
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'markdown-mode)
+  (use-package markdown-mode
-  (add-to-list 'auto-mode-alist '("README\\.md\\'" . gfm-mode))
+    :straight (:build t)
-  (add-to-list 'auto-mode-alist '("\\.md\\'" . markdown-mode))
+    :defer t
-  (add-to-list 'auto-mode-alist '("\\.markdown\\'" . markdown-mode))
+    :config
-  (setq markdown-command "multimarkdown")
+    (add-to-list 'auto-mode-alist '("README\\.md\\'" . gfm-mode))
+    (add-to-list 'auto-mode-alist '("\\.md\\'" . markdown-mode))
+    (add-to-list 'auto-mode-alist '("\\.markdown\\'" . markdown-mode))
+    (setq markdown-command "multimarkdown"))
 #+end_src
 **** PKGBUILD
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'pkgbuild-mode)
+  (use-package pkgbuild-mode
-  ;;(phundrak/major-leader-key
+    :straight (:build t)
-  ;;  :keymaps 'pkgbuild-mode-map
+    :defer t)
-  ;;  "c"  #'pkgbuild-syntax-check
-  ;;  "i"  #'pkgbuild-initialize
-  ;;  "I"  #'pkgbuild-increase-release-tag
-  ;;  "m"  #'pkgbuild-makepkg
-  ;;  "u"  '(:ignore :wk "update")
-  ;;  "us" #'pkgbuild-update-sums-line
-  ;;  "uS" #'pkgbuild-update-srcinfo))
 #+end_src
 **** Systemd
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'systemd)
+  (use-package systemd
+    :straight (:build t)
+    :defer t)
 #+end_src
 **** Toml
 #+begin_src emacs-lisp
-  (usr-package-install 'toml-mode)
+  (use-package toml-mode
-  (add-to-list 'auto-mode-alist '("/\\(Cargo.lock\\|\\.cargo/config\\)\\'" . toml-mode))
+    :straight (:build t)
+    :defer t
+    :config
+    (add-to-list 'auto-mode-alist '("/\\(Cargo.lock\\|\\.cargo/config\\)\\'" . toml-mode)))
 #+end_src
 
 **** Gnuplot
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'gnuplot)
+  (use-package gnuplot
+    :straight (:build t)
+    :defer t)
 #+end_src
 **** Graphviz dot Mode
 org mode graph drawing with graphviz
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-languages.el
-  (usr-package-install 'graphviz-dot-mode)
+  (use-package graphviz-dot-mode
+    :straight (:build t)
+    :defer t)
 #+end_src
 **** Verilog Indent
 LSP -> veriloter