view debian/slrn.sl @ 464:d9035d08fe51 noffle

[svn] * src/fetch.c: Log failed posting that we can't mail back to the sender or where sending fails to <Noffle spool>/failed.posting.
author bears
date Wed, 23 Jul 2003 10:32:25 +0100
parents 3b5b7f3fd71f
children
line wrap: on
line source

% SLRN script for better interplay with NOFFLE news server.
% Redefines some keys for opening articles without modifying flags.
define my_article_linedn()
{
  call ( "article_linedn" );
  if (is_substr(extract_article_header("X-NOFFLE-Status"), "NOT_DOWNLOADED"))
    set_header_flags( ( get_header_flags() | HEADER_READ ) xor HEADER_READ );
  return;
}
define my_scroll_dn()
{
  call ( "scroll_dn" );
  if (is_substr(extract_article_header("X-NOFFLE-Status"), "NOT_DOWNLOADED"))
    set_header_flags( ( get_header_flags() | HEADER_READ ) xor HEADER_READ );
  return;
}
define my_hide_article()
{
  call ( "hide_article" );
  if (is_substr(extract_article_header("X-NOFFLE-Status"), "NOT_DOWNLOADED"))
    set_header_flags( ( get_header_flags() | HEADER_READ ) xor HEADER_READ );
  return;
}
definekey( "my_article_linedn", "\r", "article" );
definekey( "my_scroll_dn", " ", "article" );
definekey( "my_hide_article", "h", "article" );