commit
9bbb17d34a
|
@ -139,7 +139,7 @@ Public Class RemoteAppEditWindow
|
||||||
|
|
||||||
Dim SysApps As New SystemRemoteApps
|
Dim SysApps As New SystemRemoteApps
|
||||||
|
|
||||||
If Not RemoteApp.Name Is Nothing Then If Not RemoteApp.Name = ShortName Then SysApps.RenameApp(RemoteApp.Name, ShortName)
|
If (Not RemoteApp.Name Is Nothing) And Not (Me.Text = "New RemoteApp") Then If Not RemoteApp.Name = ShortName Then SysApps.RenameApp(RemoteApp.Name, ShortName)
|
||||||
|
|
||||||
RemoteApp.Name = ShortName
|
RemoteApp.Name = ShortName
|
||||||
RemoteApp.FullName = FullName
|
RemoteApp.FullName = FullName
|
||||||
|
|
Loading…
Reference in New Issue