From b0abd8aca60912f283bf43df651d14a36dbc9f6a Mon Sep 17 00:00:00 2001
From: Case Duckworth
Date: Sun, 6 Feb 2022 22:17:56 -0600
Subject: Meh

---
 lisp/+xkcd.el | 16 ++++++++++++++++
 1 file changed, 16 insertions(+)
 create mode 100644 lisp/+xkcd.el

(limited to 'lisp/+xkcd.el')

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
-- 
cgit 1.4.1-21-gabe81