<$MTBlogName$>: <$MTEntryTitle$>

What follows is my attempt to implement Shelley of Burningbird's Quick Blog Comment Spam Fix at http://weblog.burningbird.net/fires/000638.htm. It failed, generating a -500 Internal Server Error for all comment attempts even after changes were made to mt-comments.cgi and all the templates, and the site rebuilt. I wish I knew what I was doing wrong. We'll start with the modified mt-comments.cgi.... -------------------- #!/usr/bin/perl -w # Copyright 2001-2003 Six Apart. This code cannot be redistributed without # permission from www.movabletype.org. # # $Id: mt-comments.cgi,v 1.34 2003/02/12 01:05:31 btrott Exp $ use strict; use CGI qw(:standard); if ($ENV{'REQUEST_METHOD'} eq "POST") { my $data = param('tornado'); die unless ($data); } my($MT_DIR); BEGIN { if ($0 =~ m!(.*[/\\])!) { $MT_DIR = $1; } else { $MT_DIR = './'; } unshift @INC, $MT_DIR . 'lib'; unshift @INC, $MT_DIR . 'extlib'; } eval { require MT::App::Comments; my $app = MT::App::Comments->new( Config => $MT_DIR . 'mt.cfg', Directory => $MT_DIR ) or die MT::App::Comments->errstr; local $SIG{__WARN__} = sub { $app->trace($_[0]) }; $app->run; }; if ($@) { print "Content-Type: text/html\n\n"; print "An error occurred: $@"; } -------------------- And here's my individual archive template as modified, ----- .... section (no changes made) ----- <$MTBlogName$>: <$MTEntryTitle$> " /> " /> <$MTEntryTrackbackData$> ----- ....comments-related section (added Burningbird's fragment, note values of "tornado" and "offtooz"): -----

Comments

<$MTCommentBody$> Posted by: <$MTCommentAuthorLink spam_protect="1"$> on <$MTCommentDate$>