From ae07519895c1ee5a047deed2d616fb94c8e5bcd7 Mon Sep 17 00:00:00 2001
From: Vadim Dashevskiy <watcherhd@gmail.com>
Date: Fri, 20 Dec 2013 10:58:59 +0000
Subject: LangPackMgr update MK2 (from Jebifor)

git-svn-id: http://svn.miranda-ng.org/main/trunk@7296 1316c22d-e87f-b044-9b9b-93d7a3e3ba9c
---
 tools/langpackmgr/Unit1.pas |  2 +-
 tools/langpackmgr/unit1.lfm | 16 ++++++++--------
 2 files changed, 9 insertions(+), 9 deletions(-)

(limited to 'tools')

diff --git a/tools/langpackmgr/Unit1.pas b/tools/langpackmgr/Unit1.pas
index 86a7dae5ed..43856e383c 100644
--- a/tools/langpackmgr/Unit1.pas
+++ b/tools/langpackmgr/Unit1.pas
@@ -260,7 +260,7 @@ begin
 end;
 
 procedure tform1.Button4Click(Sender: TObject);
-  var str:widestring; i:integer;
+  var str:string; i:integer;
    begin
    str:='http://translate.google.com/?hl=&ie=yhgg#auto/';
    if  locale='belarusian' then str:=str+'be/';
diff --git a/tools/langpackmgr/unit1.lfm b/tools/langpackmgr/unit1.lfm
index cf741b9ecd..b32e674905 100644
--- a/tools/langpackmgr/unit1.lfm
+++ b/tools/langpackmgr/unit1.lfm
@@ -71,25 +71,25 @@ object Form1: TForm1
     Left = 136
     Height = 21
     Top = 312
-    Width = 43
+    Width = 56
     Caption = 'Copy'
     OnClick = Button3Click
     TabOrder = 5
   end
   object Button4: TButton
-    Left = 184
+    Left = 200
     Height = 21
     Top = 312
-    Width = 43
+    Width = 56
     Caption = 'Google'
     OnClick = Button4Click
     TabOrder = 6
   end
   object Button2: TButton
-    Left = 232
+    Left = 264
     Height = 21
     Top = 312
-    Width = 43
+    Width = 56
     Caption = 'Find'
     Enabled = False
     OnClick = Button2Click
@@ -108,7 +108,7 @@ object Form1: TForm1
     Left = 136
     Height = 35
     Top = 0
-    Width = 137
+    Width = 169
     AutoFill = True
     Caption = 'View'
     ChildSizing.LeftRightSpacing = 6
@@ -120,7 +120,7 @@ object Form1: TForm1
     ChildSizing.Layout = cclLeftToRightThenTopToBottom
     ChildSizing.ControlsPerLine = 2
     ClientHeight = 17
-    ClientWidth = 133
+    ClientWidth = 165
     Columns = 2
     ItemIndex = 0
     Items.Strings = (
@@ -130,7 +130,7 @@ object Form1: TForm1
     TabOrder = 9
   end
   object Label1: TLabel
-    Left = 448
+    Left = 424
     Height = 14
     Top = 15
     Width = 61
-- 
cgit v1.2.3