acs_mail_lite::address_allowed_p (private)

 acs_mail_lite::address_allowed_p recipient allowed_patterns

Defined in packages/acs-mail-lite/tcl/acs-mail-lite-procs.tcl

Return true when the recipient matches one of the allowed address patterns.

Parameters:

recipient (required)

allowed_patterns (required)

Partial Call Graph (max 5 caller/called nodes):

Testcases:

No testcase defined.

Source code:

        foreach pattern $allowed_patterns {
            if {[string match -nocase $pattern $recipient]} {
                return 1
            }
        }
        return 0

Generic XQL file:

packages/acs-mail-lite/tcl/acs-mail-lite-procs.xql

PostgreSQL XQL file:

packages/acs-mail-lite/tcl/acs-mail-lite-procs-postgresql.xql

Oracle XQL file:

packages/acs-mail-lite/tcl/acs-mail-lite-procs-oracle.xql