From c78c62bd4a0eca87ae711d1efbd3f0cca46faf70 Mon Sep 17 00:00:00 2001
From: Yuchen Pei <id@ypei.org>
Date: Thu, 26 Dec 2024 21:44:19 +1100
Subject: Adding a utility to guess that a url is a x/twitter post

---
 exitter.el | 4 ++++
 1 file changed, 4 insertions(+)

diff --git a/exitter.el b/exitter.el
index 6fca09a..ce22d8e 100644
--- a/exitter.el
+++ b/exitter.el
@@ -575,6 +575,10 @@ Including ancestors and descendants, if any."
             .favorite_count
             )))
 
+(defun exitter-post-url-p (url)
+  (string-match-p "^/[^/]+/status/\\([0-9]+\\)"
+                  (url-filename (url-generic-parse-url url))))
+
 (defun exitter-open-post (url)
   (interactive "sTwitter link: ")
   (let ((path-etc (url-filename (url-generic-parse-url url))))
-- 
cgit v1.2.3