Mercurial > noffle

comparison debian/slrn.sl @ 301:3b5b7f3fd71f noffle

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[svn] initial debian/ upload
author godisch
date Fri, 14 Feb 2003 13:54:32 +0000
parents
children
comparison
equal deleted inserted replaced
300:994e9ab2c24f 301:3b5b7f3fd71f
1 % SLRN script for better interplay with NOFFLE news server.
2 % Redefines some keys for opening articles without modifying flags.
3 define my_article_linedn()
4 {
5 call ( "article_linedn" );
6 if (is_substr(extract_article_header("X-NOFFLE-Status"), "NOT_DOWNLOADED"))
7 set_header_flags( ( get_header_flags() | HEADER_READ ) xor HEADER_READ );
8 return;
9 }
10 define my_scroll_dn()
11 {
12 call ( "scroll_dn" );
13 if (is_substr(extract_article_header("X-NOFFLE-Status"), "NOT_DOWNLOADED"))
14 set_header_flags( ( get_header_flags() | HEADER_READ ) xor HEADER_READ );
15 return;
16 }
17 define my_hide_article()
18 {
19 call ( "hide_article" );
20 if (is_substr(extract_article_header("X-NOFFLE-Status"), "NOT_DOWNLOADED"))
21 set_header_flags( ( get_header_flags() | HEADER_READ ) xor HEADER_READ );
22 return;
23 }
24 definekey( "my_article_linedn", "\r", "article" );
25 definekey( "my_scroll_dn", " ", "article" );
26 definekey( "my_hide_article", "h", "article" );