notification::email::parse_email_address (private)

 notification::email::parse_email_address email

Defined in packages/notifications/tcl/notification-email-procs.tcl

Strip out the user's name (in angle brackets) from an e-mail address if it exists.

Parameters:

email (required)

Testcases:

No testcase defined.

Source code:

        if {![regexp {<([^>]*)>} $email all clean_email]} {
            return $email
        } else {
            return $clean_email
        }

XQL Not present:

PostgreSQL

Generic XQL file:

packages/notifications/tcl/notification-email-procs.xql

Oracle XQL file:

packages/notifications/tcl/notification-email-procs-oracle.xql