--- Tidy.pm.orig    2009-06-16 13:00:50.000000000 -0700
+++ Tidy.pm    2010-10-11 03:38:42.015625000 -0700
@@ -22604,6 +22604,7 @@
                 # check for syntax error here;
                 unless ( $is_blocktype_with_paren{$last_nonblank_token} ) {
                     my $list = join( ' ', sort keys %is_blocktype_with_paren );
+                    warning("I SAW '$last_nonblank_token' \n");
                     warning(
                         "syntax error at ') {', didn't see one of: $list\n");
                 }