paul/dotfiles
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

slrn: update config

Browse Source
This commit is contained in:
Paul Walker
2025-05-08 23:25:16 +01:00
parent ff43938401
commit bb4fe29bcf
3 changed files with 33 additions and 15 deletions
Download Patch File Download Diff File Expand all files Collapse all files

44
slrn/approved.sl
View File

@@ -1,5 +1,3 @@
% This variable will hold the followup_custom_headers as defined in the
% .slrnrc file.
variable Default_Followup_Headers;
Default_Followup_Headers = get_variable_value ("followup_custom_headers");
@@ -10,21 +8,43 @@ define followup_hook ()
h = Default_Followup_Headers;
if ((0 == strncmp (current_newsgroup, "alt.sysadmin.recovery", 21)) |
(0 == strncmp (current_newsgroup, "alt.tech-support.recovery", 25)) |
(0 == strncmp (current_newsgroup, "bofh.", 5))
)
(0 == strncmp (current_newsgroup, "alt.tech-support.recovery", 25)))
{
% Generate Approved header
h = sprintf ("%sApproved: probably not\n", h);
}
if ((0 != strncmp(current_newsgroup, "comp.", 5)) &
(0 != strncmp(current_newsgroup, "rec.", 4)) &
(0 != strncmp(current_newsgroup, "bofh.", 5))
)
{
h = sprintf("%sX-No-Archive: Yes\n", h);
}
if (0 == strncmp (current_newsgroup, "bofh.", 5))
{
% Generate Distribution header
h = sprintf ("%sDistribution: bofh\n", h);
}
set_string_variable ("followup_custom_headers", h);
}
variable Default_Custom_Headers;
Default_Custom_Headers = get_variable_value ("custom_headers");
define post_hook ()
{
variable h;
h = Default_Custom_Headers;
if ((0 == strncmp (current_newsgroup, "alt.sysadmin.recovery", 21)) |
(0 == strncmp (current_newsgroup, "alt.tech-support.recovery", 25)))
{
% Generate Approved header
h = sprintf ("%sApproved: probably not\n", h);
}
if (0 == strncmp (current_newsgroup, "bofh.", 5))
{
% Generate Distribution header
h = sprintf ("%sDistribution: bofh\n", h);
}
set_string_variable ("custom_headers", h);
}