浏览代码

* Fix wrong raise statement

Michaël Van Canneyt 1 年之前
父节点
当前提交
258211e038
共有 1 个文件被更改,包括 1 次插入1 次删除
  1. 1 1
      utils/unicode/gbpparser.lpr

+ 1 - 1
utils/unicode/gbpparser.lpr

@@ -102,7 +102,7 @@ begin
     'E_Base_GAZ':
     'E_Base_GAZ':
       Result := gbpE_Base_GAZ;
       Result := gbpE_Base_GAZ;
     else
     else
-      raise EArgumentException('Unknown grapheme break property: ''' + S + '''');
+      raise EArgumentException.Create('Unknown grapheme break property: ''' + S + '''');
   end;
   end;
 end;
 end;