Skip to content
This repository

HTTPS clone URL

Subversion checkout URL

You can clone with HTTPS or Subversion.

Download ZIP
  • 4 commits
  • 4 files changed
  • 0 comments
  • 1 contributor
3  CHANGELOG.TXT
... ... @@ -1,3 +1,4 @@
  1 +1.71 Beta 3 (2013-03-20):
1 2 Fixed issue MR-397 - Putty disappears from the screen
2 3 Fixed issue MR-398 - Full Screen mode doesn't correctly make use of available space
3 4 Fixed issue MR-402 - scrollbar touch moves putty window
@@ -5,6 +6,8 @@
5 6 Fixed issue MR-410 - Unhandled exception when clicking New button under Theme
6 7 Fixed issue MR-413 - Can't use aplication
7 8 Fixed new connections having a globe icon.
  9 + Fixed the category names in the themes tab of the options dialog on Windows XP not showing correctly.
  10 + Fixed PuTTY saved sessions with spaces or special characters not being listed.
8 11
9 12 1.71 Beta 2 (2013-03-19):
10 13 Added feature MR-336 - Customizable background color for the windows/panels
7 mRemoteV1/App/App.Runtime.vb
@@ -2,7 +2,6 @@
2 2 Imports mRemoteNG.Messages
3 3 Imports mRemoteNG.Connection
4 4 Imports mRemoteNG.Tools
5   -Imports mRemoteNG.My
6 5 Imports PSTaskDialog
7 6 Imports WeifenLuo.WinFormsUI.Docking
8 7 Imports System.IO
@@ -407,7 +406,7 @@ Namespace App
407 406 End Sub
408 407
409 408 Private Shared Sub CheckLenovoAutoScrollUtility()
410   - If Not Settings.CompatibilityWarnLenovoAutoScrollUtility Then Return
  409 + If Not My.Settings.CompatibilityWarnLenovoAutoScrollUtility Then Return
411 410
412 411 Dim proccesses() As Process = {}
413 412 Try
@@ -416,9 +415,9 @@ Namespace App
416 415 End Try
417 416 If proccesses.Length = 0 Then Return
418 417
419   - cTaskDialog.MessageBox(System.Windows.Forms.Application.ProductName, Language.strCompatibilityProblemDetected, String.Format(Language.strCompatibilityLenovoAutoScrollUtilityDetected, System.Windows.Forms.Application.ProductName), "", "", Language.strCheckboxDoNotShowThisMessageAgain, eTaskDialogButtons.OK, eSysIcons.Warning, Nothing)
  418 + cTaskDialog.MessageBox(Application.ProductName, My.Language.strCompatibilityProblemDetected, String.Format(My.Language.strCompatibilityLenovoAutoScrollUtilityDetected, System.Windows.Forms.Application.ProductName), "", "", My.Language.strCheckboxDoNotShowThisMessageAgain, eTaskDialogButtons.OK, eSysIcons.Warning, Nothing)
420 419 If cTaskDialog.VerificationChecked Then
421   - Settings.CompatibilityWarnLenovoAutoScrollUtility = False
  420 + My.Settings.CompatibilityWarnLenovoAutoScrollUtility = False
422 421 End If
423 422 End Sub
424 423
16 mRemoteV1/Config/PuttySessions.vb
@@ -55,14 +55,18 @@ Namespace Config
55 55 treeView.EndUpdate()
56 56 End Sub
57 57
58   - Protected Shared Function GetSessionNames(Optional ByVal addDefaultSettings As Boolean = False) As String()
  58 + Protected Shared Function GetSessionNames(Optional ByVal raw As Boolean = False) As String()
59 59 Dim sessionsKey As RegistryKey = Registry.CurrentUser.OpenSubKey(PuttySessionsKey)
60 60 If sessionsKey Is Nothing Then Return New String() {}
61 61
62 62 Dim sessionNames As New List(Of String)
63   - If addDefaultSettings Then sessionNames.Add("Default Settings")
  63 + If Not raw Then sessionNames.Add("Default Settings") ' Do not localize
64 64 For Each sessionName As String In sessionsKey.GetSubKeyNames()
65   - sessionNames.Add(Web.HttpUtility.UrlDecode(sessionName))
  65 + If raw Then
  66 + sessionNames.Add(sessionName)
  67 + Else
  68 + sessionNames.Add(Web.HttpUtility.UrlDecode(sessionName))
  69 + End If
66 70 Next
67 71 Return sessionNames.ToArray()
68 72 End Function
@@ -70,7 +74,7 @@ Namespace Config
70 74 Protected Shared Function LoadSessions() As Connection.PuttySession.Info()
71 75 Dim sessionList As New List(Of Connection.PuttySession.Info)
72 76 Dim sessionInfo As Connection.Info
73   - For Each sessionName As String In GetSessionNames()
  77 + For Each sessionName As String In GetSessionNames(True)
74 78 sessionInfo = SessionToConnectionInfo(sessionName)
75 79 If sessionInfo Is Nothing Then Continue For
76 80 sessionList.Add(sessionInfo)
@@ -85,6 +89,8 @@ Namespace Config
85 89 Dim sessionKey As RegistryKey = sessionsKey.OpenSubKey(sessionName)
86 90 If sessionKey Is Nothing Then Return Nothing
87 91
  92 + sessionName = Web.HttpUtility.UrlDecode(sessionName)
  93 +
88 94 Dim sessionInfo As New Connection.PuttySession.Info
89 95 With sessionInfo
90 96 .PuttySession = sessionName
@@ -122,7 +128,7 @@ Namespace Config
122 128
123 129 Public Shared ReadOnly Property Names() As String()
124 130 Get
125   - Return GetSessionNames(True)
  131 + Return GetSessionNames()
126 132 End Get
127 133 End Property
128 134
1  mRemoteV1/Forms/frmOptions.vb
@@ -1489,6 +1489,7 @@ Public Class frmOptions
1489 1489 Me.ThemePropertyGrid.Name = "ThemePropertyGrid"
1490 1490 Me.ThemePropertyGrid.Size = New System.Drawing.Size(596, 426)
1491 1491 Me.ThemePropertyGrid.TabIndex = 3
  1492 + Me.ThemePropertyGrid.UseCompatibleTextRendering = True
1492 1493 '
1493 1494 'frmOptions
1494 1495 '

No commit comments for this range

Something went wrong with that request. Please try again.