diff options
| author | pcnerd97 <[email protected]> | 2015-04-07 19:26:28 +0100 |
|---|---|---|
| committer | pcnerd97 <[email protected]> | 2015-04-07 19:26:28 +0100 |
| commit | c1cbedbfd08448b8382889f60079a3d8cdf79f09 (patch) | |
| tree | cfb18dc039ae98d43014e9c2bd8dd791c33ab3aa /ShiftOS/ApplicationEvents.vb | |
| parent | bbf81cacaec7c68b6ac232cbfe72b6369a7c0a46 (diff) | |
| download | shiftos-c1cbedbfd08448b8382889f60079a3d8cdf79f09.tar.gz shiftos-c1cbedbfd08448b8382889f60079a3d8cdf79f09.tar.bz2 shiftos-c1cbedbfd08448b8382889f60079a3d8cdf79f09.zip | |
Dock And Browser
Fixes a few issues with the dock and adds unlimed tabs to the web
browser
Diffstat (limited to 'ShiftOS/ApplicationEvents.vb')
| -rw-r--r-- | ShiftOS/ApplicationEvents.vb | 15 |
1 files changed, 1 insertions, 14 deletions
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
|