Ivan Kanis
2015-01-08 08:11:36 UTC
Hello,
I look at newsgroup once in a long while. I find that threaded articles
are more interesting than lone post.
This is why I am trying to put threaded articles on top of my summary.
I set gnus-thread-sort-functions to '(gnus-thread-sort-by-score).
Now I am trying to tweak gnus-article-sort-by-score to compare threaded
article.
(defun gnus-article-sort-by-score (h1 h2)
(let ((score1 (or (cdr (assq (mail-header-number h1)
gnus-newsgroup-scored))
gnus-summary-default-score 0))
(score2 (or (cdr (assq (mail-header-number h2)
gnus-newsgroup-scored))
gnus-summary-default-score 0)))
(if (= score1 score2) (is-thread h2)
(> score1 score2))))
The problem I am facing is how do I tell that h2 is threaded?
I looked at the function that does a total score of a thread and found
it hard to understand.
Is the internal of gnus (such as header format) documented anywhere?
Am I even going the right way about this? Should I score threaded
article higher rather than messing with the sort function?
Any help much welcome,
Ivan
I look at newsgroup once in a long while. I find that threaded articles
are more interesting than lone post.
This is why I am trying to put threaded articles on top of my summary.
I set gnus-thread-sort-functions to '(gnus-thread-sort-by-score).
Now I am trying to tweak gnus-article-sort-by-score to compare threaded
article.
(defun gnus-article-sort-by-score (h1 h2)
(let ((score1 (or (cdr (assq (mail-header-number h1)
gnus-newsgroup-scored))
gnus-summary-default-score 0))
(score2 (or (cdr (assq (mail-header-number h2)
gnus-newsgroup-scored))
gnus-summary-default-score 0)))
(if (= score1 score2) (is-thread h2)
(> score1 score2))))
The problem I am facing is how do I tell that h2 is threaded?
I looked at the function that does a total score of a thread and found
it hard to understand.
Is the internal of gnus (such as header format) documented anywhere?
Am I even going the right way about this? Should I score threaded
article higher rather than messing with the sort function?
Any help much welcome,
Ivan
--
Webmasters kidnapped by evil cult.
-- BOFH excuse #43
Webmasters kidnapped by evil cult.
-- BOFH excuse #43