Code

* Serbian (Cyrillic) update by Aleksandar Urošević
[inkscape.git] / po / check-markup
index 6450e1fe31f827805f8ec403c93195482df12894..f11ca1f0bcc815baa0219045a55659fb892d4c99 100755 (executable)
@@ -66,6 +66,21 @@ sub check_str ($) {
        }
     }
 
+    if (($str =~ m{&#[^0-9]+;}) or ($str =~ m{&#x[^0-9a-fA-F]+;})) {
+       po_error("Entity declaration error (must look like '{' or '@' and be in ASCII)");
+       return 0;
+    }
+
+    if (($str =~ m{&#[^0-9]+}) or ($str =~ m{&#x[^0-9a-fA-F]+})) {
+       po_error("Entity declaration error 2 (must look like '{' or '@' and be in ASCII)");
+       return 0;
+    }
+
+    if (($str =~ m{&#(?![0-9]{2,4};)}) or ($str =~ m{&#x(?![0-9a-fA-F]{2,4};)})) {
+       po_error("Entity declaration error 3 (must look like '{' or '@' and be in ASCII)");
+       return 0;
+    }
+
     # Check for attributes etc. in non-<span> element.
     if ($str =~ m{<([bisu]|big|su[bp]|small|tt)\b(?! *)>}) {
        po_error("Unexpected characters in <$1> tag");