Bug 10480: (QA followup) hide the EXAMPLE.pl plugin
The EXAMPLE.pl plugin remains on the source tree for documentation purposes only, and shouldn't be listed when editing both biblio and authority cataloguing frameworks. Signed-off-by: Tomas Cohen Arazi <tomascohen@gmail.com>
This commit is contained in:
parent
7db33499b1
commit
2292bff781
2 changed files with 5 additions and 3 deletions
|
@ -114,7 +114,8 @@ if ($op eq 'add_form') {
|
||||||
opendir(DIR, "$cgidir/cataloguing/value_builder") || die "can't opendir $cgidir/value_builder: $!";
|
opendir(DIR, "$cgidir/cataloguing/value_builder") || die "can't opendir $cgidir/value_builder: $!";
|
||||||
}
|
}
|
||||||
while (my $line = readdir(DIR)) {
|
while (my $line = readdir(DIR)) {
|
||||||
if ($line =~ /\.pl$/) {
|
if ( $line =~ /\.pl$/ &&
|
||||||
|
$line !~ /EXAMPLE\.pl$/ ) { # documentation purposes
|
||||||
push (@value_builder,$line);
|
push (@value_builder,$line);
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
|
@ -161,7 +161,8 @@ if ( $op eq 'add_form' ) {
|
||||||
|| die "can't opendir $cgidir/value_builder: $!";
|
|| die "can't opendir $cgidir/value_builder: $!";
|
||||||
}
|
}
|
||||||
while ( my $line = readdir(DIR) ) {
|
while ( my $line = readdir(DIR) ) {
|
||||||
if ( $line =~ /\.pl$/ ) {
|
if ( $line =~ /\.pl$/ &&
|
||||||
|
$line !~ /EXAMPLE\.pl$/ ) { # documentation purposes
|
||||||
push( @value_builder, $line );
|
push( @value_builder, $line );
|
||||||
}
|
}
|
||||||
}
|
}
|
||||||
|
|
Loading…
Reference in a new issue