Changeset 24

Show
Ignore:
Timestamp:
08/30/09 01:12:17 (1 year ago)
Author:
jdixon
Message:

add ability to disable comment submission

Files:

Legend:

Unmodified
Added
Removed
Modified
Copied
Moved

  • trunk/index.cgi

    r23 r24  
    1919my $captcha_seckey = ''; 
    2020my $comment_max_length = '1000'; 
     21my $comments_allowed = 0; 
    2122 
    2223 
    …… 
    3031        output_rss(); 
    3132} else { 
    32         read_comment(); 
     33        read_comment() if $comments_allowed; 
    3334        my $articles = get_articles(); 
    3435        my $archives = get_archives(); 
    …… 
    3940        if (@{$articles}) { 
    4041                $template->param( articles => $articles ); 
    41                 if ($cgi->param('uri')) { 
     42                if ($cgi->param('uri') && $comments_allowed) { 
    4243                        $template->param( comment_form => 1 ); 
    4344                        $template->param( comment_max_length => $comment_max_length );