Changeset 1999 for trunk/gsdl

Timestamp:

2001-02-16T17:20:53+13:00 (23 years ago)

Author:

sjboddie

Message:

Fixed a small problem with language detection code.

File:

• trunk/gsdl/perllib/plugins/BasPlug.pm (modified) (1 diff)

trunk/gsdl/perllib/plugins/BasPlug.pm

@@ -369 +369 @@
     close FILE;
 
+    # remove <title>stuff</title> -- as titles tend often to be in English
+    # for foreign language documents
+    $text =~ s/<title>.*?<\/title>//i;
+
     # remove all HTML tags
     $text =~ s/<[^>]*>//sg;