From 548e0111e8f5474adb967791fb713dfe71f71a42 Mon Sep 17 00:00:00 2001
From: Graeme Geldenhuys <graemeg@gmail.com>
Date: Fri, 20 Dec 2013 23:25:19 +0000
Subject: uidesigner: Adds last missed localisation of vfdmain unit.

---
 uidesigner/vfd_constants.pas | 5 +++--
 uidesigner/vfdmain.pas       | 2 +-
 2 files changed, 4 insertions(+), 3 deletions(-)

(limited to 'uidesigner')

diff --git a/uidesigner/vfd_constants.pas b/uidesigner/vfd_constants.pas
index 7b49f7f5..25fe3ee3 100644
--- a/uidesigner/vfd_constants.pas
+++ b/uidesigner/vfd_constants.pas
@@ -14,8 +14,8 @@
   Description:
     This unit contains all the language resource strings used by the
     UI Designer project. Thus making it possible to translate the UI Designer
-    to other languages.
-  }
+    to other languages. It also contains all project constants.
+}
 
 unit vfd_constants;
 
@@ -41,6 +41,7 @@ resourcestring
   rsVersion = 'Version: %s';
   rsWrittenBy = 'Written by %s';
   rsCompiledOn = 'Compiled on:  %s';
+  rsNewUnnamedForm = 'new';
 
   rsDlgProductInfo = 'Product Information...';
 
diff --git a/uidesigner/vfdmain.pas b/uidesigner/vfdmain.pas
index 51622b9f..5dcb90d4 100644
--- a/uidesigner/vfdmain.pas
+++ b/uidesigner/vfdmain.pas
@@ -460,7 +460,7 @@ begin
   FEditedFileName := Value;
   s := ExtractFileName(FEditedFileName);
   if s = '' then
-    s := '[new]';
+    s := '[' + rsNewUnnamedForm + ']';
   frmMain.WindowTitle := cAppNameAndVersion + ' - ' + s;
 end;
 
-- 
cgit v1.2.3-70-g09d2