From abb7a31a09f90a0e82aea037d1ccf94d451e918c Mon Sep 17 00:00:00 2001
From: Matt Ward <ward.matt@gmail.com>
Date: Sat, 4 Jun 2011 12:06:50 +0100
Subject: [PATCH] Fix VB.NET web page project that did not compile.

---
 data/templates/project/VB/WebpageProject.xpt | 18 ++++++++++--------
 1 file changed, 10 insertions(+), 8 deletions(-)

diff --git a/data/templates/project/VB/WebpageProject.xpt b/data/templates/project/VB/WebpageProject.xpt
index c667bc261a..0f24cb37db 100644
--- a/data/templates/project/VB/WebpageProject.xpt
+++ b/data/templates/project/VB/WebpageProject.xpt
@@ -42,6 +42,7 @@
 	<Files>
 <!--*************************************************************************-->
 		<File name=".\Default.aspx.vb" DependentUpon="Default.aspx"><![CDATA[${StandardHeader.VBNET}Imports System.Collections
+IMports System
 Imports System.ComponentModel
 Imports System.Data
 Imports System.Drawing
@@ -132,6 +133,7 @@ End Class
 ]]></File>
 		<File name=".\Global.asax.vb" DependentUpon="Global.asax">
 			<![CDATA[Imports System.Collections
+Imports System
 Imports System.ComponentModel
 Imports System.Web
 Imports System.Web.SessionState
@@ -155,35 +157,35 @@ Public Class [Global]
 	#End Region
 	'<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<<
 
-	Protected Sub Application_Start(sender As [Object], e As EventArgs)
+	Protected Sub Application_Start(sender As Object, e As EventArgs)
 
 	End Sub
 
-	Protected Sub Session_Start(sender As [Object], e As EventArgs)
+	Protected Sub Session_Start(sender As Object, e As EventArgs)
 
 	End Sub
 
-	Protected Sub Application_BeginRequest(sender As [Object], e As EventArgs)
+	Protected Sub Application_BeginRequest(sender As Object, e As EventArgs)
 
 	End Sub
 
-	Protected Sub Application_EndRequest(sender As [Object], e As EventArgs)
+	Protected Sub Application_EndRequest(sender As Object, e As EventArgs)
 
 	End Sub
 
-	Protected Sub Application_AuthenticateRequest(sender As [Object], e As EventArgs)
+	Protected Sub Application_AuthenticateRequest(sender As Object, e As EventArgs)
 
 	End Sub
 
-	Protected Sub Application_Error(sender As [Object], e As EventArgs)
+	Protected Sub Application_Error(sender As Object, e As EventArgs)
 
 	End Sub
 
-	Protected Sub Session_End(sender As [Object], e As EventArgs)
+	Protected Sub Session_End(sender As Object, e As EventArgs)
 
 	End Sub
 
-	Protected Sub Application_End(sender As [Object], e As EventArgs)
+	Protected Sub Application_End(sender As Object, e As EventArgs)
 
 	End Sub