From b0b8c13c200c15a1d1ca1e9eb4fc3ce0845d4fd9 Mon Sep 17 00:00:00 2001
From: Siegfried Pammer <siegfriedpammer@gmail.com>
Date: Wed, 27 Jul 2011 12:57:33 +0200
Subject: [PATCH] fix SD-1818 - VB NotifyIcon Application template not working
 properly

---
 data/templates/project/VB/NotifyIcon.xpt | 18 +++++++++++++-----
 1 file changed, 13 insertions(+), 5 deletions(-)

diff --git a/data/templates/project/VB/NotifyIcon.xpt b/data/templates/project/VB/NotifyIcon.xpt
index c8b38aa0d6..7fd00bbc6f 100644
--- a/data/templates/project/VB/NotifyIcon.xpt
+++ b/data/templates/project/VB/NotifyIcon.xpt
@@ -27,17 +27,25 @@
 			<Reference Include="System.Xml" />
 		</ProjectItems>
 		
+		<ProjectItems>
+			<Import Include="Microsoft.VisualBasic" />
+			<Import Include="System" />
+			<Import Include="System.Collections" />
+			<Import Include="System.Collections.Generic" />
+			<Import Include="System.Drawing" />
+			<Import Include="System.Diagnostics" />
+			<Import Include="System.Windows.Forms" />
+		</ProjectItems>
+		
 		<PropertyGroup>
 			<OutputType>WinExe</OutputType>
 			<AppDesignerFolder>Properties</AppDesignerFolder>
+			<MyType>WindowsFormsWithCustomSubMain</MyType>
 		</PropertyGroup>
 		
 		<Files>
 			<File name="NotificationIcon.vb"><![CDATA[${StandardHeader.VBNET}
-Imports System.Diagnostics
-Imports System.Drawing
 Imports System.Threading
-Imports System.Windows.Forms
 
 Public NotInheritable Class NotificationIcon
 	Private notifyIcon As NotifyIcon
@@ -76,8 +84,8 @@ Public NotInheritable Class NotificationIcon
 				notificationIcon.notifyIcon.Visible = True
 				Application.Run()
 				notificationIcon.notifyIcon.Dispose()
-					' The application is already running
-					' TODO: Display message box or change focus to existing application instance
+				' The application is already running
+				' TODO: Display message box or change focus to existing application instance
 			Else
 			End If
 		End Using