Commit 766e6c38 authored by Nathan Haug's avatar Nathan Haug
Browse files

Added argument to alter the default protocol in link_cleanup_url

parent 5b0ce76e
......@@ -415,9 +415,10 @@ function link_views_tables() {
* Forms a valid URL if possible from an entered address.
* Trims whitespace and automatically adds an http:// to addresses without a protocol specified
*
* @param unknown_type $url
* @param string $url
* @param string $protocol The protocol to be prepended to the url if one is not specified
*/
function link_cleanup_url ($url) {
function link_cleanup_url ($url, $protocol = "http") {
$url = trim($url);
// Check if there is no protocol specified
......@@ -426,7 +427,7 @@ function link_cleanup_url ($url) {
// But should it be? Add an automatic http:// if it starts with a domain name
$domain_match = preg_match('/^(([a-z0-9]([a-z0-9\-_]*\.)+)(aero|arpa|biz|com|coop|edu|gov|info|int|jobs|mil|museum|name|nato|net|org|pro|travel|[a-z]{2}))/i',$url);
if (!empty($domain_match)) {
$url = "http://".$url;
$url = $protocol."://".$url;
}
}
......
Supports Markdown
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment