From 55665c67139aec686e5ce5c226ab1520059ffb97 Mon Sep 17 00:00:00 2001
From: pierre <pierre@freepascal.org>
Date: Mon, 9 Apr 2012 21:54:19 +0000
Subject: [PATCH]  Set local variable s to empty string at entry of
 transform_cp437_to_UTF8 function

git-svn-id: trunk@20772 -
---
 rtl/unix/video.pp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/rtl/unix/video.pp b/rtl/unix/video.pp
index 7c551f9951..54d3cb3b3b 100644
--- a/rtl/unix/video.pp
+++ b/rtl/unix/video.pp
@@ -633,7 +633,7 @@ var
       converted : WideChar;
       s : WideString;
   begin
-    transform_cp437_to_UTF8 := '';
+    s := '';
     for i:=1 to length(st) do
       begin
         c:=st[i];