Changeset 4735 for trunk/bbc/collect


Ignore:
Timestamp:
2003-06-19T14:53:15+12:00 (18 years ago)
Author:
sjboddie
Message:

* empty log message *

Location:
trunk/bbc/collect/bbc/perllib
Files:
3 edited

Legend:

Unmodified
Added
Removed
  • trunk/bbc/collect/bbc/perllib/bbcotherbuildproc.pm

    r4647 r4735  
    5353    my $self = shift (@_);
    5454
    55     if ($self->{'indexing_text'} && ($_[0] eq "ProgNumber" || $_[0] eq "zzabn" )) {
     55    if ($self->{'indexing_text'} && $_[0] eq "ProgNumber") {
    5656    $_[1] =~ s/[^\w]//g;
    5757    }
  • trunk/bbc/collect/bbc/perllib/bfibuildproc.pm

    r4647 r4735  
    5353    my $self = shift (@_);
    5454
    55     if ($self->{'indexing_text'} && ($_[0] eq "ProgNumber" || $_[0] eq "zzabn" )) {
     55    if ($self->{'indexing_text'} && $_[0] eq "ProgNumber") {
    5656    $_[1] =~ s/[^\w]//g;
    5757    }
  • trunk/bbc/collect/bbc/perllib/nsabuildproc.pm

    r4647 r4735  
    5353    my $self = shift (@_);
    5454
    55     if ($self->{'indexing_text'} && ($_[0] eq "ProgNumber" || $_[0] eq "zzabn" )) {
     55    if ($self->{'indexing_text'} && $_[0] eq "ProgNumber") {
    5656    $_[1] =~ s/[^\w]//g;
    5757    }
Note: See TracChangeset for help on using the changeset viewer.