1 files changed, 16 insertions, 0 deletions
diff --git a/lisp/+xkcd.el b/lisp/+xkcd.el
new file mode 100644
index 0000000..6780b90
--- /dev/null
+++ b/lisp/+xkcd.el

@@ -0,0 +1,16 @@
+;;; +xkcd.el -*- lexical-binding: t; -*-
+;;; Commentary:
+;;; Code:
+(require 'xkcd)
+(defun +xkcd-get-from-url (url &rest _)
+  "Open XKCD from URL."
+  (if (string-match "xkcd\\.com/\\([0-9]+\\)" url)
+      (xkcd-get (string-to-number (match-string 1 url)))
+    (funcall +browse-url-browser-function url)))
+(provide '+xkcd)
+;;; +xkcd.el ends here

diff --git a/lisp/+xkcd.el b/lisp/+xkcd.el new file mode 100644 index 0000000..6780b90 --- /dev/null +++ b/lisp/+xkcd.el
@@ -0,0 +1,16 @@
	1	;;; +xkcd.el -- lexical-binding: t; --
	2
	3	;;; Commentary:
	4
	5	;;; Code:
	6
	7	(require 'xkcd)
	8
	9	(defun +xkcd-get-from-url (url &rest _)
	10	"Open XKCD from URL."
	11	(if (string-match "xkcd\\.com/\\([0-9]+\\)" url)
	12	(xkcd-get (string-to-number (match-string 1 url)))
	13	(funcall +browse-url-browser-function url)))
	14
	15	(provide '+xkcd)
	16	;;; +xkcd.el ends here