Fixed bug 827 -- silly me still had a reference to a .tcl file. Oops!

diff --git a/process_bug.cgi b/process_bug.cgi
index d6af0fca267cf1b630b9c74d0502bdfee596caf0..6755ce91cf50c231dc660f33c60da0acb75b7d5e 100755 (executable)
--- a/process_bug.cgi
+++ b/process_bug.cgi
@@ -305,7 +305,7 @@ if (defined $::next_bug) {
     print "<HR>\n";
 
     navigation_header();
-    do "bug_form.tcl";
+    do "bug_form.pl";
 } else {
     print "<BR><A HREF=\"query.cgi\">Back To Query Page</A>\n";
 }