Ok, update the urlreg alias:
alias urlreg return /(\x03\d{1,2}(?:,\d{1,2})?|)(.*)((?:(?:http)|(?:www)\.)\S+)|(\S+\.(?:com|org|edu|gov|net|tv|uk|cc|xxx|mil|co|us|se|fm|me|de|kr|sv|fr|jp|tk|be|ly|info|biz|us|in|mobi)\S*)/ig
and the $regsubex now becomes:
$regsubex($1-, $urlreg,\1\2$urlcolor(\3)\1)
Edit: You can also use \K in the pattern after (.*) and remove the \1\2 in the $regsubex.