Emacs : ediff / openwith

.config/emacs/emacs.org

@@ -170,6 +170,13 @@ Emacs Configuration for emacs 29.50
 ** Module Lists
 *** Default
 emacs built-in package config
+**** Ediff
+#+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-default.el
+;; Don't let ediff break EXWM, keep it in one frame
+(setq ediff-diff-options "-w"
+      ediff-split-window-function 'split-window-horizontally
+      ediff-window-setup-function 'ediff-setup-windows-plain)
+#+end_src
 **** Eshell
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-default.el
   (when (eq system-type 'windows-nt)
@@ -225,7 +232,6 @@ emacs built-in package config
           (concat (abbreviate-file-name (eshell/pwd))
                   (if (= (user-uid) 0) " # " " λ ")))
         eshell-prompt-regexp "^[^#λ\n]* [#λ] ")
-
 #+end_src
 **** Dired
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-default.el
@@ -947,6 +953,7 @@ speed-up insertion of environments and math templates.
   (usr-package-install 'avy)
   (usr-package-install 'yasnippet)
   (usr-package-install 'yasnippet-snippets)
+  (usr-package-install 'openwith)
 #+end_src
 **** Helpful
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
@@ -999,6 +1006,22 @@ enhanced PDF viewer on emacs
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
   (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
+  (setq larget-file-warning-threshold nil)
+  (openwith-mode t)
+  (setq openwith-associations
+        (list (list (openwith-make-extension-regexp
+                     '("mpg" "mpeg" "mp3" "mp4" "m4v"
+                       "avi" "wmv" "wav" "mov" "flv"
+                       "ogm" "ogg" "mkv"))
+                    "mpv"
+                    '(file))
+                (list (openwith-make-extension-regexp
+                       '("html" "htm"))
+                      "qutebrowser"
+                      '(file))))
+#+end_src
 **** Provide Modules
 #+begin_src emacs-lisp :mkdirp yes :tangle ~/.config/emacs/modules/custom-extra.el
   (provide 'custom-extra)