Gnus development mailing list
 help / color / mirror / Atom feed
From: Emanuel Berg <incal@dataswamp.org>
To: ding@gnus.org
Subject: Re: downscore a subject temporarily
Date: Sat, 25 Mar 2023 02:10:13 +0100	[thread overview]
Message-ID: <87ilepws96.fsf@dataswamp.org> (raw)
In-Reply-To: <87355yq6c0.fsf@dataswamp.org>

I think this works.

Give the boring subjects a new shot in the new year, right?

There is still something in me that tells me there is a better
way to do it, but let's see if this is actually good enough
for government work then ...

;;; -*- lexical-binding: t -*-
;;
;; this file:
;;   https://dataswamp.org/~incal/emacs-init/gnus/gnus-score-incal.el

(require 'gnus-score)

(defun next-year ()
  (format "%d-01-01" (1+ (string-to-number (format-time-string "%Y")))) )

(defun gnus-summary-downscore-subject ()
  (interactive)
  (let ((hdr "subject"))
    (gnus-summary-score-entry
       hdr
       (gnus-summary-header hdr)
       'e
       -1000
       (next-year) )))

(defalias 'gs #'gnus-summary-downscore-subject)

(provide 'gnus-score-incal)

-- 
underground experts united
https://dataswamp.org/~incal



      reply	other threads:[~2023-03-25  1:10 UTC|newest]

Thread overview: 9+ messages / expand[flat|nested]  mbox.gz  Atom feed  top
2023-03-21  4:11 Emanuel Berg
2023-03-21 16:51 ` Andreas Schwab
2023-03-21 17:14   ` Emanuel Berg
2023-03-21 17:47     ` Andreas Schwab
2023-03-21 18:04       ` Emanuel Berg
2023-03-21 18:39         ` Andreas Schwab
2023-03-21 18:54           ` Emanuel Berg
2023-03-21 18:58             ` Emanuel Berg
2023-03-25  1:10               ` Emanuel Berg [this message]

Reply instructions:

You may reply publicly to this message via plain-text email
using any one of the following methods:

* Save the following mbox file, import it into your mail client,
  and reply-to-all from there: mbox

  Avoid top-posting and favor interleaved quoting:
  https://en.wikipedia.org/wiki/Posting_style#Interleaved_style

* Reply using the --to, --cc, and --in-reply-to
  switches of git-send-email(1):

  git send-email \
    --in-reply-to=87ilepws96.fsf@dataswamp.org \
    --to=incal@dataswamp.org \
    --cc=ding@gnus.org \
    /path/to/YOUR_REPLY

  https://kernel.org/pub/software/scm/git/docs/git-send-email.html

* If your mail client supports setting the In-Reply-To header
  via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line before the message body.
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for NNTP newsgroup(s).