From 51e4bc7eae67b2f02b74649388a56589a63a07a7 Mon Sep 17 00:00:00 2001
From: Riley McArdle <riley@glyff.net>
Date: Tue, 26 Feb 2013 16:19:06 -0600
Subject: [PATCH] Move search prompt to resource string.

---
 mRemoteV1/Language/Language.Designer.vb | 9 +++++++++
 mRemoteV1/Language/Language.resx        | 3 +++
 mRemoteV1/UI/UI.Window.Tree.vb          | 7 ++++---
 3 files changed, 16 insertions(+), 3 deletions(-)

diff --git a/mRemoteV1/Language/Language.Designer.vb b/mRemoteV1/Language/Language.Designer.vb
index 6cc89cbc..7641d694 100644
--- a/mRemoteV1/Language/Language.Designer.vb
+++ b/mRemoteV1/Language/Language.Designer.vb
@@ -5033,6 +5033,15 @@ Namespace My
             End Get
         End Property
         
+        '''<summary>
+        '''  Looks up a localized string similar to Search.
+        '''</summary>
+        Friend Shared ReadOnly Property strSearchPrompt() As String
+            Get
+                Return ResourceManager.GetString("strSearchPrompt", resourceCulture)
+            End Get
+        End Property
+        
         '''<summary>
         '''  Looks up a localized string similar to Send To....
         '''</summary>
diff --git a/mRemoteV1/Language/Language.resx b/mRemoteV1/Language/Language.resx
index 9d123403..b84abc5e 100644
--- a/mRemoteV1/Language/Language.resx
+++ b/mRemoteV1/Language/Language.resx
@@ -2064,4 +2064,7 @@ mRemoteNG will now quit and begin with the installation.</value>
   <data name="strIdentifyQuickConnectTabs" xml:space="preserve">
     <value>Identify quick connect tabs by adding the prefix "Quick:"</value>
   </data>
+  <data name="strSearchPrompt" xml:space="preserve">
+    <value>Search</value>
+  </data>
 </root>
\ No newline at end of file
diff --git a/mRemoteV1/UI/UI.Window.Tree.vb b/mRemoteV1/UI/UI.Window.Tree.vb
index 33193f0c..1b934d1c 100644
--- a/mRemoteV1/UI/UI.Window.Tree.vb
+++ b/mRemoteV1/UI/UI.Window.Tree.vb
@@ -1,4 +1,5 @@
 Imports mRemoteNG.Connection
+Imports mRemoteNG.My
 Imports WeifenLuo.WinFormsUI.Docking
 Imports mRemoteNG.App.Runtime
 
@@ -501,7 +502,7 @@ Namespace UI
                 mMenViewExpandAllFolders.Text = My.Language.strExpandAllFolders
                 mMenViewCollapseAllFolders.Text = My.Language.strCollapseAllFolders
                 mMenSortAscending.ToolTipText = My.Language.strSortAsc
-                txtSearch.Text = "Search"
+                txtSearch.Text = Language.strSearchPrompt
                 TabText = My.Language.strConnections
                 Text = My.Language.strConnections
             End Sub
@@ -1210,7 +1211,7 @@ Namespace UI
 #Region "Search"
             Private Sub txtSearch_GotFocus(ByVal sender As Object, ByVal e As EventArgs) Handles txtSearch.GotFocus
                 txtSearch.ForeColor = SystemColors.WindowText
-                If txtSearch.Text = "Search" Then
+                If txtSearch.Text = Language.strSearchPrompt Then
                     txtSearch.Text = ""
                 End If
             End Sub
@@ -1218,7 +1219,7 @@ Namespace UI
             Private Sub txtSearch_LostFocus(ByVal sender As Object, ByVal e As EventArgs) Handles txtSearch.LostFocus
                 If txtSearch.Text = "" Then
                     txtSearch.ForeColor = SystemColors.GrayText
-                    txtSearch.Text = "Search"
+                    txtSearch.Text = Language.strSearchPrompt
                 End If
             End Sub