Changeset 4735 for trunk/bbc/collect/bbc
- Timestamp:
- 2003-06-19T14:53:15+12:00 (20 years ago)
- Location:
- trunk/bbc/collect/bbc/perllib
- Files:
-
- 3 edited
Legend:
- Unmodified
- Added
- Removed
-
trunk/bbc/collect/bbc/perllib/bbcotherbuildproc.pm
r4647 r4735 53 53 my $self = shift (@_); 54 54 55 if ($self->{'indexing_text'} && ($_[0] eq "ProgNumber" || $_[0] eq "zzabn" )) {55 if ($self->{'indexing_text'} && $_[0] eq "ProgNumber") { 56 56 $_[1] =~ s/[^\w]//g; 57 57 } -
trunk/bbc/collect/bbc/perllib/bfibuildproc.pm
r4647 r4735 53 53 my $self = shift (@_); 54 54 55 if ($self->{'indexing_text'} && ($_[0] eq "ProgNumber" || $_[0] eq "zzabn" )) {55 if ($self->{'indexing_text'} && $_[0] eq "ProgNumber") { 56 56 $_[1] =~ s/[^\w]//g; 57 57 } -
trunk/bbc/collect/bbc/perllib/nsabuildproc.pm
r4647 r4735 53 53 my $self = shift (@_); 54 54 55 if ($self->{'indexing_text'} && ($_[0] eq "ProgNumber" || $_[0] eq "zzabn" )) {55 if ($self->{'indexing_text'} && $_[0] eq "ProgNumber") { 56 56 $_[1] =~ s/[^\w]//g; 57 57 }
Note:
See TracChangeset
for help on using the changeset viewer.