|
Server : Apache/2.2.2 (Fedora) System : Linux App1.pathumtani.go.th 2.6.20-1.2320.fc5smp #1 SMP Tue Jun 12 19:40:16 EDT 2007 i686 User : apache ( 48) PHP Version : 5.2.9 Disable Function : NONE Directory : /usr/share/slrn/macros/ |
Upload File : |
% This example shows how followup_hook may be used to generate the
% X-Comment-To field associated with fido.* newsgroups.
% 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");
define followup_hook ()
{
variable h;
variable from;
h = Default_Followup_Headers;
if (0 == strncmp (current_newsgroup, "fido.", 5))
{
from = extract_displayed_article_header ("Reply-To");
!if (strlen (from))
from = extract_displayed_article_header ("From");
% It is a fido newsgroup. Generate X-Comment-To: header
h = sprintf ("%s\nX-Comment-To: %s", h, from);
}
set_string_variable ("followup_custom_headers", h);
}