Navi2ch for Emacs (Part 22) (370ﾚｽ)
上下前次1-新
156: 2023/06/15(木)00:44 AAS
ああなるほど
あんまりよく分かっていないもんですから
157(1): 2023/06/15(木)23:39 AAS
elisp だけで 5ch を読むための navi2ch-5ch.el を書き換えた
必要な変数設定も埋め込んだ
----BEGIN BASE64----(navi2ch-5ch.el.gz)
H4sICJ4gi2QCC25hdmkyY2gtNWNoLmVsAM1YX4/bRBB/vogPsTIctXOyfcm1UE6+
RLSq2opSXpB4iO8ix94kFrETvJtrQX3hHvkUPIKQQOIb8DUQX4JvwMzser32JSlX
XrjrpevZ+fPbmdmZcVzB5TesTK7zYbr0k0rm6Yr7vExm8F+Wz+eszFdez22xrXIh
/dlMSOLaVivmLKXcnIdhwctt8CBdBiWXIXDQ81IWK2enjutklWf+cg3Lii/4602P
0Y+brss0kcyJY9fpHWmiYvHXG8nuuU5txmFOAAoDkdYrTQTzm7z8OkjXBeg4Ii1O
UCTpMoctItfPgVw7nlcbAqteHN9DSs/N+Pw6qQxsMOrjeXy59rOkhu0PehboKJMj
Qo3wJ6f+J5cnpFFMrqLLvtqJYGt8nrBlxecXsVMk+Uquz5H/KnYUP0i/ma9LObka
省14
158: 2023/06/15(木)23:40 AAS
つづき
s+18zitfbGHqq5BRu6HhzufMvWDjCCoH+MFP5hL8rTiOamUa39uGKZC4C/8Q+dH8
bm/USiwf2PHa4YG7Aj6znPZqmaO//hUUzFJIUis/XeVd1F9TFD7t9YHXRN/lWOb0
et3lHHrMcQys+sfFwjldJmK5S+bM6xDuayW1RaxmU8GnebZD+kGHecYHxuwt5o9u
MQ/3M3/cYdaVYzfzwzYzFgUroPYJKr5ZJSmvo5iXtQrHLtS6KjL4xbcI/SJhKbLz
pXHvQe3jSTK7RJ1OI2GrqQ94SMmsGuEfKdH8d1JBr0QODthqdq9rc17Q/KEanqA2
Qm2AWvTVh5f1BK/HHlQSxwODgb0LClCNQLway2Sa+N9d0ie2p/4FNifocH3C1afG
K3SHszb+vbienjT4OB7G8dl/O0KUFwt4dxFVehGr1q1bLzoyDHE3Dux+my6BgJ24
nlL6+qVP9MOx9qwL9aPAIUwIga/XoCU4FrqDA2qVkXQhIJ+h/A7Zrd7mwcXsmbRl
xHZ/F9uwzSZVXKngAPXdfEPJ3rpF3WSl7ni78eo6fYcIMB2DvUGA5zCcXAXo6OCh
省11
159(1): 2023/07/03(月)23:55 AAS
>>157
いただいたファイルを ~/.emacs.d/elpa/navi2ch-20200130.36/navi2ch-5ch.el に置いて、
emacs-28.2 -q で起動した後
(when (require 'package nil t)
(add-to-list 'package-archives
'("melpa" . "外部ﾘﾝｸ:melpa.org t)
(package-initialize))
(eval-after-load "navi2ch"
(load "navi2ch-5ch"))
を評価して M-x navi2ch しても板一覧が取得できないのですが、何か他に設定が必要でしょうか？
160: 2023/07/04(火)23:30 AAS
>>159
>>140 の変更が必要かな?
他にも*.elファイル中でhttp:決め打ちになってる所をhttps:に変更する必要があるかも
161: 2023/07/11(火)09:25 AAS
proxy2chなしで読み書きできるようになった
162: 2023/07/11(火)16:14 AAS
Navi2ch完全ふっかああああぁつ!!wwwwwww
163: 2023/07/11(火)22:46 AAS
快適快適
164: 2023/07/12(水)19:36 AAS
分裂騒動で漁夫の利を得たNavi2ch
165: 2023/07/12(水)22:15 AAS
書き込みの規制めっちゃ緩くなってるね
いったいどうなってるんだ、いや別に悪いことじゃないんだけど
またすぐ荒らしが来て規制されるのかなあ
スレチスマソ
166(1): 2023/07/13(木)08:26 AAS
10年ぶりくらいにnavi2ch使ってみた。書き込めるかな
(setq navi2ch-list-bbstable-url "外部ﾘﾝｸ:menu.5ch.net でカテゴリーはとってくるけど板一覧が持ってこれない。
とりあえずスレのURLをChromeで探して直接開いて読んでいるw
167: 2023/07/13(木)10:25 AAS
>>166
>>139 が原因かな
168: 2023/07/15(土)09:45 AAS
山下スパイルが消えて清々しい気分だ
169: 2023/07/15(土)12:10 AAS
かける?
170: 2023/07/15(土)12:26 AAS
書ける
171: sage 2023/07/15(土)12:34 AAS
その1
diff --git a/navi2ch-list.el b/navi2ch-list.el
index 4188735..a2e8cad 100644
--- a/navi2ch-list.el
+++ b/navi2ch-list.el
@@ -567,7 +567,7 @@ changed-list は '((board-id old-board new-board) ...) な alist。
(let ((board-id (cdr (assoc url navi2ch-list-board-id-alist))))
(or board-id
(save-match-data
- (if (string-match "\\`外部ﾘﾝｸ:.+/\\([^/]+\\)/\\'" url)
省20
172: sage 2023/07/15(土)12:35 AAS
その2
diff --git a/navi2ch-multibbs.el b/navi2ch-multibbs.el
index 8e49f28..d1ef831 100644
--- a/navi2ch-multibbs.el
+++ b/navi2ch-multibbs.el
@@ -345,7 +345,7 @@ START, END, NOFIRST で範囲を指定する"
;;;-----------------------------------------------
-(defsubst navi2ch-2ch-subject-callback ()
+(defsubst navi2ch-2ch-subject-callback (&optional args)
(when navi2ch-board-use-subback-html
省10
173: sage 2023/07/15(土)12:40 AAS
その3の1
diff --git a/navi2ch-net.el b/navi2ch-net.el
index dc11ec5..972c97f 100644
--- a/navi2ch-net.el
+++ b/navi2ch-net.el
@@ -228,7 +228,8 @@ nil なら常に再接続する。")
host (cdr (assq 'host list))
file (cdr (assq 'file list))
port (cdr (assq 'port list))
- host2ch (cdr (assq 'host2ch list))))
省19
174: sage 2023/07/15(土)12:44 AAS
その3の2
@@ -304,6 +302,10 @@ nil なら常に再接続する。")
(navi2ch-net-cleanup-vars)
(setq navi2ch-net-process proc))))
+(defun navi2ch-net-split-url-scheme-to-rest (scheme)
+ (if (string-prefix-p "https:" scheme)
+ '(:type tls)))
+
(defun navi2ch-net-split-url (url &optional proxy)
(let (host2ch authinfo user pass)
省13
175: sage [その3の3 最後] 2023/07/15(土)12:44 AAS
- (cons 'host (match-string 1 url))
- (cons 'port (string-to-number (or (match-string 2 url)
- "80")))
- (cons 'file (match-string 3 url))
- (cons 'host2ch host2ch)))))
+ (cons 'host (match-string 2 url))
+ (cons 'port
+ (if (match-string 3 url)
+ (string-to-number (match-string 3 url))
+ (if (string-prefix-p "https:" (match-string 1 url))
省15
上下前次1-新書関写板覧索設栞歴
あと 195 ﾚｽあります
ｽﾚ情報 赤ﾚｽ抽出 画像ﾚｽ抽出 歴の未読ｽﾚ AAｻﾑﾈｲﾙ
ぬこの手 ぬこTOP 0.008s