Mercurial > noffle
view debian/slrn.sl @ 425:c2fd00030991 noffle
[svn] added preliminary ucf support
author | godisch |
---|---|
date | Fri, 20 Jun 2003 17:48:28 +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" );