From 0ff7bae1fa923f266b80975037126c5cb78a5ccb Mon Sep 17 00:00:00 2001
From: Yuchen Pei <hi@ypei.me>
Date: Thu, 15 Sep 2022 22:49:02 +1000
Subject: [client] Adding command to open wikipedia

---
 lisp/servall-wikipedia.el | 6 ++++++
 1 file changed, 6 insertions(+)

(limited to 'lisp/servall-wikipedia.el')

diff --git a/lisp/servall-wikipedia.el b/lisp/servall-wikipedia.el
index c6ba504..c6b0e93 100644
--- a/lisp/servall-wikipedia.el
+++ b/lisp/servall-wikipedia.el
@@ -138,6 +138,12 @@
         (goto-char (point-min))))
     buffer))
 
+(defun servall-wikipedia-open (title)
+  (interactive "sTitle: ")
+  (condition-case nil
+      (switch-to-buffer (servall-wikipedia-load title))
+    (error (servall-wikipedia-search title))))
+
 (defun servall-wikipedia-fix-tables ()
   (let ((inhibit-read-only t))
     (save-excursion
-- 
cgit v1.2.3