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,8 +114,9 @@ if ($op eq 'add_form') {
|
|||
opendir(DIR, "$cgidir/cataloguing/value_builder") || die "can't opendir $cgidir/value_builder: $!";
|
||||
}
|
||||
while (my $line = readdir(DIR)) {
|
||||
if ($line =~ /\.pl$/) {
|
||||
push (@value_builder,$line);
|
||||
if ( $line =~ /\.pl$/ &&
|
||||
$line !~ /EXAMPLE\.pl$/ ) { # documentation purposes
|
||||
push (@value_builder,$line);
|
||||
}
|
||||
}
|
||||
@value_builder= sort {$a cmp $b} @value_builder;
|
||||
|
|
|
@ -161,7 +161,8 @@ if ( $op eq 'add_form' ) {
|
|||
|| die "can't opendir $cgidir/value_builder: $!";
|
||||
}
|
||||
while ( my $line = readdir(DIR) ) {
|
||||
if ( $line =~ /\.pl$/ ) {
|
||||
if ( $line =~ /\.pl$/ &&
|
||||
$line !~ /EXAMPLE\.pl$/ ) { # documentation purposes
|
||||
push( @value_builder, $line );
|
||||
}
|
||||
}
|
||||
|
|
Loading…
Reference in a new issue