Changeset 11124

Timestamp:

03/15/10 10:17:39 (2 years ago)

Author:

azawawi

Message:

A better fix to r11123 and ticket:889.

File:

• trunk/Padre/lib/Padre/Locale.pm (modified) (1 diff)

trunk/Padre/lib/Padre/Locale.pm

@@ -599 +599 @@
     # Because Encode::Guess is slow and expensive, do an initial fast
     # regexp scan for the simplest and most common "ascii" encoding.
-    # Check for POSIX printable characters, plus the two newline characters.
-    #return 'ascii' unless $content =~ /[^[:print:]\015\012]/;
+    return 'ascii' unless $content =~ /[^[:ascii:]]/;
 
     # FIX ME