From 14182cb35b00855d830e3b283199c3f0b669ad63 Mon Sep 17 00:00:00 2001
From: Mateus Pinto Rodrigues <mprodrigues@posteo.net>
Date: Thu, 24 Oct 2019 19:41:59 -0300
Subject: [PATCH] Add openwith.

---
 elisp/extras.el         |  4 ++++
 elisp/openwith-setup.el | 24 ++++++++++++++++++++++++
 2 files changed, 28 insertions(+)
 create mode 100644 elisp/openwith-setup.el

diff --git a/elisp/extras.el b/elisp/extras.el
index 1f9cc24..05bb702 100644
--- a/elisp/extras.el
+++ b/elisp/extras.el
@@ -32,6 +32,10 @@
 
 ;; Orthodox file browser
 (use-package sunrise-commander)
+;; open files in external applications
+(use-package openwith
+  :config
+  (load "~/.emacs.d/elisp/openwith-setup.el"))
 
 ;; Programming environment
 ;; git
diff --git a/elisp/openwith-setup.el b/elisp/openwith-setup.el
new file mode 100644
index 0000000..4da0c3c
--- /dev/null
+++ b/elisp/openwith-setup.el
@@ -0,0 +1,24 @@
+(require 'openwith)
+(setq openwith-associations
+      (list
+       (list (openwith-make-extension-regexp
+              '("mpg" "mpeg" "mp3" "mp4"
+                "avi" "wmv" "wav" "mov" "flv"
+                "ogm" "ogg" "mkv"))
+             "mpv"
+             '(file))
+       (list (openwith-make-extension-regexp
+              '("xbm" "pbm" "pgm" "ppm" "pnm"
+                "png" "gif" "bmp" "tif" "jpeg" "jpg"))
+             "viewnior"
+             '(file))
+       (list (openwith-make-extension-regexp
+              '("doc" "xls" "ppt" "odt" "ods" "odg" "odp"))
+             "libreoffice"
+             '(file))
+       (list (openwith-make-extension-regexp
+              '("pdf" "ps" "ps.gz" "dvi"))
+             "mupdf"
+             '(file))
+       ))
+(openwith-mode 1)