$NetBSD: patch-aa,v 1.2 2001/04/24 13:25:30 kim Exp $

--- cvsweb.cgi.orig	Thu Jul 27 13:42:28 2000
+++ cvsweb.cgi	Tue Apr 24 09:21:42 2001
@@ -1,4 +1,4 @@
-#!/usr/bin/perl -ws
+#!/usr/bin/perl -s
 #
 # cvsweb - a CGI interface to CVS trees.
 #
@@ -2051,7 +2051,7 @@
 	print "</SELECT>\n";
 	$diffrev = $revdisplayorder[0];
 	$diffrev = $input{"r2"} if (defined($input{"r2"}));
-	print "<INPUT TYPE=\"TEXT\" SIZE=\"$inputTextSize\" NAME=\"tr2\" VALUE=\"$diffrev\" onChange='docuement.diff_select.r2.selectedIndex=0'>\n";
+	print "<INPUT TYPE=\"TEXT\" SIZE=\"$inputTextSize\" NAME=\"tr2\" VALUE=\"$diffrev\" onChange='document.diff_select.r2.selectedIndex=0'>\n";
         print "<BR>Type of Diff should be a&nbsp;";
 	printDiffSelect();
 	print "<INPUT TYPE=SUBMIT VALUE=\"  Get Diffs  \">\n";