changeset 199:33844d68cab1 noffle

[svn] Minor enhancement to slrn-script.
author mirkol
date Thu, 08 Nov 2001 20:47:11 +0000
parents 79e324213734
children a34620942998
files docs/NOTES
diffstat 1 files changed, 12 insertions(+), 9 deletions(-) [+]
line wrap: on
line diff
--- a/docs/NOTES	Tue Nov 06 21:22:19 2001 +0000
+++ b/docs/NOTES	Thu Nov 08 20:47:11 2001 +0000
@@ -139,21 +139,24 @@
    % Redefines some keys for opening articles without modifying flags.
    define my_article_linedn()
    {
-       variable flags = get_header_flags();
-       call ( "article_linedn" );
-       set_header_flags( flags );
+     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()
    {
-       variable flags = get_header_flags();
-       call ( "scroll_dn" );
-       set_header_flags( flags );
+     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()
    {
-       variable flags = get_header_flags();
-       call ( "hide_article" );
-       set_header_flags( flags );
+     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" );