Navi2ch for Emacs (Part 22) (390レス)
上下前次1-新
抽出解除 レス栞
リロード規制です。10分ほどで解除するので、他のブラウザへ避難してください。
97: 95 2021/12/15(水)21:16:13.77 AAS
>>96
レス有難うございます
駄目です直りません
102: 95 2021/12/16(木)20:56:15.77 AAS
>>101
うまいこといきました
有難うございました
264: 2024/01/03(水)21:47:22.77 AAS
修正しました。currentブランチとしてpushしてあります。
FreeBSDのcurrent, stable => current, mainの感じです。(mainをstableに変更すると大顰蹙を買いそうなので)
ファイルローカル変数としてlexical-bindingは設定してあるので、
(let ((lexical-binding t) (start start))
自体も不要だと思いますが、何となく残してしまいました。
--- a/navi2ch-jbbs-shitaraba.el
+++ b/navi2ch-jbbs-shitaraba.el
@@ -99,9 +99,9 @@ START が non-nil ならばレス番号 START からの差分を取得する。
(time (cdr (assq 'time article)))
(url (navi2ch-js-article-to-rawmode-url board article start nil start))
(func (if start
- (lexical-let ((start start))
+ (let ((lexical-binding t) (start start))
(lambda () (navi2ch-js-article-callback start)))
- 'navi2ch-js-article-callback)))
+ #'navi2ch-js-article-callback)))
(navi2ch-net-update-file url file time func nil start)))
(defun navi2ch-js-url-to-board (url)
上下前次1-新書関写板覧索設栞歴
スレ情報 赤レス抽出 画像レス抽出 歴の未読スレ AAサムネイル
ぬこの手 ぬこTOP 0.021s