.emacs-my
changeset 800 c458012963c2
parent 799 c39f6e6fd191
child 801 feb479e720e1
child 809 9712975c4263
equal deleted inserted replaced
799:c39f6e6fd191 800:c458012963c2
  1341    (gnus-catchup-mark (subject -1))
  1341    (gnus-catchup-mark (subject -1))
  1342    (gnus-kill-file-mark (from -9999))
  1342    (gnus-kill-file-mark (from -9999))
  1343    )
  1343    )
  1344  )
  1344  )
  1345 ;; Increase the score for followups to a sent article.
  1345 ;; Increase the score for followups to a sent article.
  1346 (add-hook 'message-sent-hook 'gnus-score-followup-article)
  1346 ;; (add-hook 'message-sent-hook 'gnus-score-followup-article)
  1347 (add-hook 'message-sent-hook 'gnus-score-followup-thread)
  1347 ;; (add-hook 'message-sent-hook 'gnus-score-followup-thread)
  1348 
  1348 
  1349 ;; (setq imap-log t)
  1349 ;; (setq imap-log t)
  1350 
  1350 
  1351 ;; (setq mail-user-agent 'mh-e-user-agent)
  1351 ;; (setq mail-user-agent 'mh-e-user-agent)
  1352 
  1352 
  1353 ;; (add-hook 'message-sent-hook 'gnus-score-followup-thread)
       
  1354 ;; `gnus-score-followup-thread'
  1353 ;; `gnus-score-followup-thread'
  1355 ;; `gnus-score-followup-article'
  1354 ;; `gnus-score-followup-article'
  1356 
  1355 
  1357 
  1356 
  1358 ;; (setq gnus-use-adaptive-scoring t)
  1357 ;; (setq gnus-use-adaptive-scoring t)