Navi2ch for Emacs (Part 22) (368レス)
1-

31
(6): 27 2020/06/10(水)15:44 AAS
>>28-29
ありがとう。素人だから即席だけど読めるようになった。

diff --git a/navi2ch-list.el b/navi2ch-list.el
index 4188735..48a19ea 100644
--- a/navi2ch-list.el
+++ b/navi2ch-list.el
@@ -592,6 +592,8 @@ changed-list は '((board-id old-board new-board) ...) な alist。
(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 (or (cdr (assoc
url
navi2ch-list-moved-board-alist))
1-
あと 337 レスあります
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル

ぬこの手 ぬこTOP 0.005s