瀏覽代碼

* Fix typo

Michael VAN CANNEYT 2 年之前
父節點
當前提交
4bddf12657
共有 1 個文件被更改,包括 1 次插入1 次删除
  1. 1 1
      rtl/inc/isotmp.inc

+ 1 - 1
rtl/inc/isotmp.inc

@@ -24,7 +24,7 @@
         unique : Boolean;
       begin
         InternalChangeCase := S;
-        if Length(InternalChangeCase) then
+        if Length(InternalChangeCase)=0 then
           exit;
         unique := false;
         p := PWideChar(InternalChangeCase);