update static page after comment

diff --git a/opomba.1.pl b/opomba.1.pl
index d437ba5699f51c34a3e7fa9a691623a911082bf7..4e29a569a81a6d99f76414906ee7a5eeef1f2b74 100644 (file)
--- a/opomba.1.pl
+++ b/opomba.1.pl
@@ -47,7 +47,7 @@ use bsta_lib (
        'print_html_body_start', 'print_html_body_end',
        'bb_to_html', 'eval_bb',
        'merge_settings',
-       'write_index'
+       'write_index', 'write_static_viewer_page'
 );
 
 ###PERL_PATH_SEPARATOR:     PATH_SEPARATOR     = /
@@ -408,6 +408,18 @@ close($fh);
 if (($frame == 0) && ($ong_state > STATE->{'inactive'})) {
        write_index(\%state, \%settings);
 }
+elsif ($frame >= 1) {
+       write_static_viewer_page(
+               $frame,
+               \%state,
+               \%settings,
+               '', # default
+               '', # frame data
+               '', # prev frame data
+               '', # next frame data
+               \%words_data
+       );
+}
 
 if (open_encoded($fh, ">>:encoding(UTF-8)", LOG_WORDS_PATH())) {
        delete ($post_data{'password'});