>>123
patch 1つ目
--- navi2ch-list.el.orig 2021-02-07 02:11:34.000000000 +0900
+++ navi2ch-list.el 2022-05-07 18:24:59.186532000 +0900
@@ -94,7 +94,7 @@
(nil " " navi2ch-list-board-name-face))))
(defconst navi2ch-list-bbstable-default-url
- "http://menu.2ch.net/bbsmenu.html")
+ "http://menu.5ch.net/bbsmenu.html")
;; add hook
(add-hook 'navi2ch-save-status-hook 'navi2ch-list-save-info)
@@ -592,6 +592,9 @@
(when (and (not ignore)
(string-match "href=\\(.+/\\([^/]+\\)/\\)" attr))
(setq url (match-string 1 attr))
+ ;;(when (string-match "^https" url)
+ ;; (setq url (replace-regexp-in-string "^https" "http" url)))
+ (setq url (navi2ch-replace-string "^https:" "http:" url nil))
(setq url (or (cdr (assoc
url
navi2ch-list-moved-board-alist))
Navi2ch for Emacs (Part 22)
2022/05/09(月) 17:28:41.20
レスを投稿する
