Lines Matching refs:docs
419 my $docs = shift;
420 my @docs = &read_file($docs);
422 for my $n ( 0 .. $#docs ) {
423 if ( $docs[$n] =~ /^[.']\\"\s+t\b.*/ ) {
427 elsif ( $docs[$n] =~ /^\./ ) {
435 my $docs = shift;
436 my $src = "$source_dir/man/$docs";
437 my $dst = "$update_dir/$docs";
449 my $docs = shift;
451 ©_1doc( $docs . ".1" );
452 if ( $docs eq "tic" ) {
458 my @docs = &read_dir("$source_dir/man");
459 if ( $docs eq "curses" ) {
460 for my $n ( 0 .. $#docs ) {
461 next if ( $docs[$n] eq "Makefile" );
462 next if ( $docs[$n] eq "make_sed.sh" );
463 next if ( $docs[$n] eq "man_db.renames" );
464 next if ( $docs[$n] eq "manlinks.sed" );
465 next if ( $docs[$n] =~ /\.(1|head|tail|in)/ );
466 next if ( $docs[$n] =~ /^(form|menu|mitem|panel)/ );
467 ©_1doc( $docs[$n] );
470 elsif ( $docs eq "form" ) {
471 for my $n ( 0 .. $#docs ) {
472 next unless ( $docs[$n] =~ /^form/ );
473 ©_1doc( $docs[$n] );
476 elsif ( $docs eq "menu" ) {
477 for my $n ( 0 .. $#docs ) {
478 next unless ( $docs[$n] =~ /^(menu|mitem)/ );
479 ©_1doc( $docs[$n] );
482 elsif ( $docs eq "panel" ) {
483 for my $n ( 0 .. $#docs ) {
484 next unless ( $docs[$n] =~ /^panel/ );
485 ©_1doc( $docs[$n] );