branch: externals/kiwix
commit c3254029b44e44fa59fd9e089e09db8ec599f958
Author: stardiviner <numbch...@gmail.com>
Commit: stardiviner <numbch...@gmail.com>
fix add kiwix link abbrev to org-mode list
---
kiwix.el | 11 ++++++++---
1 file changed, 8 insertions(+), 3 deletions(-)
diff --git a/kiwix.el b/kiwix.el
index 061dc69..a6802f7 100644
--- a/kiwix.el
+++ b/kiwix.el
@@ -63,9 +63,14 @@
(org-add-link-type "wiki" 'org-wiki-link-open)
;; [[Wikipedia_Local:]]
-(add-to-list
- org-link-abbrev-alist
- '("Wikipedia_Local" .
"http://127.0.0.1:8000/wikipedia_zh_all_2015-11/A/%s.html";))
+(if (and
+ (member '("Wikipedia_Local" .
"http://127.0.0.1:8000/wikipedia_zh_all_2015-11/A/%s.html";)
org-link-abbrev-alist)
+ (assoc "Wikipedia_Local" org-link-abbrev-alist))
+
+ (setq org-link-abbrev-alist
+ (cons '("Wikipedia_Local" .
"http://127.0.0.1:8000/wikipedia_zh_all_2015-11/A/%s.html";)
org-link-abbrev-alist))
+ )
+
(provide 'kiwix)
