Changeset 11966

Timestamp:

2006-06-27T12:07:27+12:00 (18 years ago)

Author:

mdewsnip

Message:

(Profiling) Creating new textcat objects (one for each plugin) is slow, and often unnecessary. Textcat objects are now only created before they are used.

File:

• trunk/gsdl/perllib/plugins/BasPlug.pm (modified) (2 diffs)

trunk/gsdl/perllib/plugins/BasPlug.pm

@@ -407 +407 @@
     $self->{'plugin_type'} = $plugin_name;
     #$self->{'outhandle'} = STDERR;
-    $self->{'textcat'} = new textcat();
     $self->{'num_processed'} = 0;
     $self->{'num_not_processed'} = 0;
@@ -1113 +1112 @@
 
     # get the language/encoding
+    $self->{'textcat'} = new textcat() if (!defined($self->{'textcat'}));
     my $results = $self->{'textcat'}->classify(\$text);