diff -pr F:\Comps\jvcl\common\JvGnugettext.pas common\JvGnugettext.pas
*** F:\Comps\jvcl\common\JvGnugettext.pas	Tue Jun 15 17:32:42 2004
--- common\JvGnugettext.pas	Sun Jul 11 02:59:04 2004
*************** begin
*** 601,607 ****
              if mode = 0 then
              begin
                if c <= $FFFF then
!                 Result := Result + Chr(c)
                else
                begin
                  if dummychar = #0 then
--- 601,607 ----
              if mode = 0 then
              begin
                if c <= $FFFF then
!                 Result := Result + WideChar(c)
                else
                begin
                  if dummychar = #0 then
*************** begin
*** 2583,2597 ****
    begin
      marker := sLineBreak +
        '===========================================================================' + sLineBreak; 
!     fs.WriteBuffer(marker[1], Length(marker)); 
!   end; 
  
!   // Copy the memorystream contents to the file
!   DebugLog.Seek(0, soFromBeginning); 
!   fs.CopyFrom(DebugLog, 0); 
  
!   // Make DebugLog point to the filestream
!   FreeAndNil(DebugLog); 
    DebugLog := fs; 
  end; 
  
--- 2583,2600 ----
    begin
      marker := sLineBreak +
        '===========================================================================' + sLineBreak; 
!     fs.WriteBuffer(marker[1], Length(marker));
!   end;
  
!   if DebugLog <> nil then
!   begin
!     // Copy the memorystream contents to the file
!     DebugLog.Seek(0, soFromBeginning);
!     fs.CopyFrom(DebugLog, 0);
  
!     // Make DebugLog point to the filestream
!     FreeAndNil(DebugLog);
!   end;
    DebugLog := fs; 
  end;