Display host name

I'd like to see the host name and an external to whois information on the event detail. It would need something like this line to add another row to the table after the ip address.

$output .= ' <tr><th>'. t('Hostname') .'</th><td>' . gethostbyaddr($behave->ip) . ' (' . l('whois','http://www.whois.sc/'.$behave->ip) . ')</td></tr>';

Sorry, I'd make a patch but the Unix line endings were giving me grief for some reason.

Tim