View | Details | Raw Unified | Return to bug 24879
Collapse All | Expand All

(-)a/xt/find-missing-auth_checks.t (-3 / +1 lines)
Lines 35-41 sub wanted { Link Here
35
          |circ
35
          |circ
36
          |clubs
36
          |clubs
37
          |course_reserves
37
          |course_reserves
38
          |installer
39
          |labels
38
          |labels
40
          |members
39
          |members
41
          |patroncards
40
          |patroncards
Lines 62-68 my @missing_auth_check; Link Here
62
FILE: foreach my $name (@files) {
61
FILE: foreach my $name (@files) {
63
    open( FILE, $name ) || die "cannot open file $name $!";
62
    open( FILE, $name ) || die "cannot open file $name $!";
64
    while ( my $line = <FILE> ) {
63
    while ( my $line = <FILE> ) {
65
        for my $routine ( qw( get_template_and_user check_cookie_auth checkauth check_api_auth ) ) {
64
        for my $routine ( qw( get_template_and_user check_cookie_auth checkauth check_api_auth C4::Service->init ) ) {
66
            next FILE if $line =~ m|^[^#]*$routine|;
65
            next FILE if $line =~ m|^[^#]*$routine|;
67
        }
66
        }
68
    }
67
    }
69
- 

Return to bug 24879