From 3ef0ac915e2956cdc964e21111b5815c9d106597 Mon Sep 17 00:00:00 2001
From: Ketmar Dark <ketmar@ketmar.no-ip.org>
Date: Mon, 18 Apr 2016 18:22:31 +0300
Subject: [PATCH] wadcvt: don't write extended info if utf8 name is the same as
 non-utf8 one

---
 src/sfs/wadcvt.dpr | 1 +
 1 file changed, 1 insertion(+)

diff --git a/src/sfs/wadcvt.dpr b/src/sfs/wadcvt.dpr
index 85666cf..46dd0a7 100644
--- a/src/sfs/wadcvt.dpr
+++ b/src/sfs/wadcvt.dpr
@@ -313,6 +313,7 @@ var
   sz: Word;
 begin
   fu := toUtf8(fname);
+  if fu = fname then begin result := nil; exit; end; // no need to write anything
   crc := crc32(0, @fname[1], length(fname));
   sz := 2+2+1+4+length(fu);
   SetLength(result, sz);
-- 
2.29.2