mirror of
https://github.com/mRemoteNG/mRemoteNG.git
synced 2026-02-17 22:11:48 +08:00
Revert "Autmatically move to Roaming profile"
This reverts commit 3592fbc418.
This commit is contained in:
@@ -4,7 +4,6 @@ Imports Crownwood
|
||||
Imports System.Threading
|
||||
Imports System.Xml
|
||||
Imports mRemoteNG.App.Native
|
||||
Imports System.Environment
|
||||
|
||||
Namespace App
|
||||
Public Class Runtime
|
||||
@@ -790,22 +789,6 @@ Namespace App
|
||||
End If
|
||||
End If
|
||||
|
||||
' LocalApplicationData to ApplicationData move if needed
|
||||
Dim oldPath As String = GetFolderPath(SpecialFolder.LocalApplicationData) & "\" & My.Application.Info.ProductName
|
||||
Dim newPath As String = App.Info.Connections.DefaultConnectionsPath
|
||||
Dim dirinfonew As IO.DirectoryInfo
|
||||
dirinfonew = New IO.DirectoryInfo(newPath)
|
||||
If (Not dirinfonew.Exists) Then
|
||||
Dim dirinfoold As IO.DirectoryInfo
|
||||
dirinfoold = New IO.DirectoryInfo(oldPath)
|
||||
If (dirinfoold.Exists) Then
|
||||
MkDir(dirinfonew.FullName)
|
||||
For Each fileInfo As FileInfo In dirinfoold.GetFiles
|
||||
File.Move(fileInfo.FullName, Path.Combine(newPath, fileInfo.Name))
|
||||
Next
|
||||
End If
|
||||
End If
|
||||
|
||||
If File.Exists(conL.ConnectionFileName) = False Then
|
||||
If WithDialog Then
|
||||
mC.AddMessage(Messages.MessageClass.WarningMsg, String.Format(My.Resources.strConnectionsFileCouldNotBeLoaded, conL.ConnectionFileName))
|
||||
|
||||
Reference in New Issue
Block a user