From cc12f523857a0c3ebd995f532d2c376e093c28e9 Mon Sep 17 00:00:00 2001
From: Andrew Ozz <azaozz@git.wordpress.org>
Date: Tue, 14 Oct 2008 05:16:24 +0000
Subject: [PATCH] Email and visit site links for edit comment form

git-svn-id: https://develop.svn.wordpress.org/trunk@9155 602fd350-edb4-49c9-b593-d223f7449a82
---
 wp-admin/edit-form-comment.php | 15 +++++++++++++--
 1 file changed, 13 insertions(+), 2 deletions(-)

diff --git a/wp-admin/edit-form-comment.php b/wp-admin/edit-form-comment.php
index 8024c41870..9921ee58c6 100644
--- a/wp-admin/edit-form-comment.php
+++ b/wp-admin/edit-form-comment.php
@@ -69,6 +69,9 @@ $time = mysql2date(get_option('time_format'), $comment->comment_date);
 </div>
 <?php
 }
+
+$email = attribute_escape( $comment->comment_author_email );
+$url = attribute_escape( $comment->comment_author_url );
 // add_meta_box('submitdiv', __('Save'), 'comment_submit_meta_box', 'comment', 'side', 'core');
 ?>
 
@@ -131,14 +134,22 @@ $time = mysql2date(get_option('time_format'), $comment->comment_date);
 <div id="emaildiv" class="stuffbox">
 <h3><label for="email"><?php _e('E-mail') ?></label></h3>
 <div class="inside">
-<input type="text" name="newcomment_author_email" size="30" value="<?php echo attribute_escape( $comment->comment_author_email ); ?>" tabindex="2" id="email" />
+<input type="text" name="newcomment_author_email" size="30" value="<?php echo $email; ?>" tabindex="2" id="email" />
+<?php if ( $email )
+	comment_author_email_link( __('Send Email'), '<p>', '</p>'); ?>
 </div>
 </div>
 
 <div id="uridiv" class="stuffbox">
 <h3><label for="newcomment_author_url"><?php _e('URL') ?></label></h3>
 <div class="inside">
-<input type="text" id="newcomment_author_url" name="newcomment_author_url" size="30" value="<?php echo attribute_escape( $comment->comment_author_url ); ?>" tabindex="3" />
+<input type="text" id="newcomment_author_url" name="newcomment_author_url" size="30" value="<?php echo $url; ?>" tabindex="3" />
+<?php if ( ! empty( $url ) && 'http://' != $url ) {
+	$url = get_comment_author_url();
+	$link = "<a href='$url' rel='external nofollow' target='_blank'>" . __('Visit site') . "</a>";
+	
+	echo '<p>' . apply_filters('get_comment_author_link', $link) . '</p>'; 
+} ?>
 </div>
 </div>