Revize 2124
Přidáno uživatelem Ondřej Fibich před asi 11 roky(ů)
| freenetis/branches/1.1/application/vendors/axo_doc/utils/find_all_axo.pl | ||
|---|---|---|
|
# get values from the matched regex
|
||
|
my ($action, $axo_section, $axo_value, $is_own) = ($1, $2, $6, defined($7));
|
||
|
# section this
|
||
|
if ($axo_section =~ m/get_class\s*\(\s*[\$]{1}this\s*\)\s*/g) {
|
||
|
if ($axo_section =~ m/get_class\s*\(\s*[\$]{1}this\s*/g) {
|
||
|
if (!("controller" eq $tag)) {
|
||
|
print STDERR "get_class in view: " . $file_name . " : " . $tag . "\n";
|
||
|
next; # skip
|
||
|
}
|
||
|
my $old = $axo_section;
|
||
|
$axo_section = ucfirst($file_name) . "_Controller";
|
||
|
print STDERR $old . " >> " . $axo_section . "\n";
|
||
|
} else {
|
||
|
$axo_section = substr($axo_section, 1, -1);
|
||
|
}
|
||
|
# increase counter
|
||
|
$parsed_acl_call_count = $parsed_acl_call_count + 1;
|
||
Také k dispozici: Unified diff
Opravy:
- oprava prohledavani volanych AXO (uzovky)