From c1cbedbfd08448b8382889f60079a3d8cdf79f09 Mon Sep 17 00:00:00 2001 From: pcnerd97 Date: Tue, 7 Apr 2015 19:26:28 +0100 Subject: Dock And Browser Fixes a few issues with the dock and adds unlimed tabs to the web browser --- ShiftOS/ApplicationEvents.vb | 15 +-------------- 1 file changed, 1 insertion(+), 14 deletions(-) (limited to 'ShiftOS/ApplicationEvents.vb') diff --git a/ShiftOS/ApplicationEvents.vb b/ShiftOS/ApplicationEvents.vb index a74cbe7..973056e 100644 --- a/ShiftOS/ApplicationEvents.vb +++ b/ShiftOS/ApplicationEvents.vb @@ -1,5 +1,4 @@ -Imports Skybound.Gecko -Imports System.IO +Imports System.IO Namespace My ' The following events are available for MyApplication: @@ -12,18 +11,6 @@ Namespace My Partial Friend Class MyApplication Protected Overrides Function OnStartup(ByVal eventArgs As Microsoft.VisualBasic.ApplicationServices.StartupEventArgs) As Boolean - - Dim ProfileDirectory As String = Environment.GetFolderPath(Environment.SpecialFolder.LocalApplicationData) & "\ShiftOS\xulrunner\DefaultProfile" - - If Not Directory.Exists(ProfileDirectory) Then - Directory.CreateDirectory(ProfileDirectory) - End If - Xpcom.ProfileDirectory = ProfileDirectory - - Dim xrPath As String = System.Reflection.Assembly.GetExecutingAssembly.Location - xrPath = xrPath.Substring(0, xrPath.LastIndexOf("\") + 1) & "\xulrunner" - Xpcom.Initialize(xrPath) - Return True End Function End Class -- cgit v1.2.3