wp/wp-admin/comment.php
author ymh <ymh.work@gmail.com>
Tue, 09 Jun 2015 03:35:32 +0200
changeset 5 5e2f62d02dcd
parent 0 d970ebf37754
child 7 cf61fcea0001
permissions -rw-r--r--
upgrade wordpress + plugins
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     1
<?php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     2
/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     3
 * Comment Management Screen
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     4
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     5
 * @package WordPress
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     6
 * @subpackage Administration
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     7
 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     8
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
     9
/** Load WordPress Bootstrap */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    10
require_once( dirname( __FILE__ ) . '/admin.php' );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    11
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    12
$parent_file = 'edit-comments.php';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    13
$submenu_file = 'edit-comments.php';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    14
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
    15
global $action;
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    16
wp_reset_vars( array('action') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    17
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    18
if ( isset( $_POST['deletecomment'] ) )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    19
	$action = 'deletecomment';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    20
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    21
if ( 'cdc' == $action )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    22
	$action = 'delete';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    23
elseif ( 'mac' == $action )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    24
	$action = 'approve';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    25
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    26
if ( isset( $_GET['dt'] ) ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    27
	if ( 'spam' == $_GET['dt'] )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    28
		$action = 'spam';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    29
	elseif ( 'trash' == $_GET['dt'] )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    30
		$action = 'trash';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    31
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    32
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    33
/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    34
 * Display error message at bottom of comments.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    35
 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    36
 * @param string $msg Error Message. Assumed to contain HTML and be sanitized.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    37
 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    38
function comment_footer_die( $msg ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    39
	echo "<div class='wrap'><p>$msg</p></div>";
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    40
	include( ABSPATH . 'wp-admin/admin-footer.php' );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    41
	die;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    42
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    43
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    44
switch( $action ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    45
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    46
case 'editcomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    47
	$title = __('Edit Comment');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    48
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    49
	get_current_screen()->add_help_tab( array(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    50
		'id'      => 'overview',
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    51
		'title'   => __('Overview'),
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    52
		'content' =>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    53
			'<p>' . __( 'You can edit the information left in a comment if needed. This is often useful when you notice that a commenter has made a typographical error.' ) . '</p>' .
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    54
			'<p>' . __( 'You can also moderate the comment from this screen using the Status box, where you can also change the timestamp of the comment.' ) . '</p>'
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    55
	) );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    56
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    57
	get_current_screen()->set_help_sidebar(
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    58
	'<p><strong>' . __( 'For more information:' ) . '</strong></p>' .
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
    59
	'<p>' . __( '<a href="https://codex.wordpress.org/Administration_Screens#Comments" target="_blank">Documentation on Comments</a>' ) . '</p>' .
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
    60
	'<p>' . __( '<a href="https://wordpress.org/support/" target="_blank">Support Forums</a>' ) . '</p>'
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    61
	);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    62
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    63
	wp_enqueue_script('comment');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    64
	require_once( ABSPATH . 'wp-admin/admin-header.php' );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    65
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    66
	$comment_id = absint( $_GET['c'] );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    67
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    68
	if ( !$comment = get_comment( $comment_id ) )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    69
		comment_footer_die( __('Oops, no comment with this ID.') . sprintf(' <a href="%s">' . __('Go back') . '</a>.', 'javascript:history.go(-1)') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    70
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    71
	if ( !current_user_can( 'edit_comment', $comment_id ) )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    72
		comment_footer_die( __('You are not allowed to edit this comment.') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    73
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    74
	if ( 'trash' == $comment->comment_approved )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    75
		comment_footer_die( __('This comment is in the Trash. Please move it out of the Trash if you want to edit it.') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    76
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    77
	$comment = get_comment_to_edit( $comment_id );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    78
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    79
	include( ABSPATH . 'wp-admin/edit-form-comment.php' );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    80
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    81
	break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    82
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    83
case 'delete'  :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    84
case 'approve' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    85
case 'trash'   :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    86
case 'spam'    :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    87
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    88
	$title = __('Moderate Comment');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    89
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    90
	$comment_id = absint( $_GET['c'] );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    91
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    92
	if ( !$comment = get_comment_to_edit( $comment_id ) ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    93
		wp_redirect( admin_url('edit-comments.php?error=1') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    94
		die();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    95
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    96
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    97
	if ( !current_user_can( 'edit_comment', $comment->comment_ID ) ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    98
		wp_redirect( admin_url('edit-comments.php?error=2') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
    99
		die();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   100
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   101
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   102
	// No need to re-approve/re-trash/re-spam a comment.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   103
	if ( $action == str_replace( '1', 'approve', $comment->comment_approved ) ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   104
		wp_redirect( admin_url( 'edit-comments.php?same=' . $comment_id ) );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   105
		die();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   106
 	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   107
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   108
	require_once( ABSPATH . 'wp-admin/admin-header.php' );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   109
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   110
	$formaction    = $action . 'comment';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   111
	$nonce_action  = 'approve' == $action ? 'approve-comment_' : 'delete-comment_';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   112
	$nonce_action .= $comment_id;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   113
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   114
?>
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   115
<div class="wrap">
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   116
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   117
<h2><?php echo esc_html( $title ); ?></h2>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   118
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   119
<?php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   120
switch ( $action ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   121
	case 'spam' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   122
		$caution_msg = __('You are about to mark the following comment as spam:');
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   123
		$button      = __('Mark as Spam');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   124
		break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   125
	case 'trash' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   126
		$caution_msg = __('You are about to move the following comment to the Trash:');
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   127
		$button      = __('Move to Trash');
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   128
		break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   129
	case 'delete' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   130
		$caution_msg = __('You are about to delete the following comment:');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   131
		$button      = __('Permanently Delete Comment');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   132
		break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   133
	default :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   134
		$caution_msg = __('You are about to approve the following comment:');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   135
		$button      = __('Approve Comment');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   136
		break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   137
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   138
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   139
if ( $comment->comment_approved != '0' ) { // if not unapproved
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   140
	$message = '';
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   141
	switch ( $comment->comment_approved ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   142
		case '1' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   143
			$message = __('This comment is currently approved.');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   144
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   145
		case 'spam' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   146
			$message  = __('This comment is currently marked as spam.');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   147
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   148
		case 'trash' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   149
			$message  = __('This comment is currently in the Trash.');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   150
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   151
	}
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   152
	if ( $message ) {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   153
		echo '<div class="notice notice-info"><p>' . $message . '</p></div>';
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   154
	}
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   155
}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   156
?>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   157
<p><strong><?php _e('Caution:'); ?></strong> <?php echo $caution_msg; ?></p>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   158
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   159
<table class="form-table comment-ays">
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   160
<tr>
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   161
<th scope="row"><?php _e('Author'); ?></th>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   162
<td><?php echo $comment->comment_author; ?></td>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   163
</tr>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   164
<?php if ( $comment->comment_author_email ) { ?>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   165
<tr>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   166
<th scope="row"><?php _e('E-mail'); ?></th>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   167
<td><?php echo $comment->comment_author_email; ?></td>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   168
</tr>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   169
<?php } ?>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   170
<?php if ( $comment->comment_author_url ) { ?>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   171
<tr>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   172
<th scope="row"><?php _e('URL'); ?></th>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   173
<td><a href="<?php echo $comment->comment_author_url; ?>"><?php echo $comment->comment_author_url; ?></a></td>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   174
</tr>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   175
<?php } ?>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   176
<tr>
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   177
	<th scope="row"><?php _e( 'In Response To' ); ?></th>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   178
	<td>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   179
	<?php
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   180
		$post_id = $comment->comment_post_ID;
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   181
		if ( current_user_can( 'edit_post', $post_id ) ) {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   182
			$post_link = "<a href='" . esc_url( get_edit_post_link( $post_id ) ) . "'>";
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   183
			$post_link .= esc_html( get_the_title( $post_id ) ) . '</a>';
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   184
		} else {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   185
			$post_link = esc_html( get_the_title( $post_id ) );
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   186
		}
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   187
		echo $post_link;
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   188
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   189
		if ( $comment->comment_parent ) {
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   190
			$parent      = get_comment( $comment->comment_parent );
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   191
			$parent_link = esc_url( get_comment_link( $comment->comment_parent ) );
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   192
			$name        = get_comment_author( $parent->comment_ID );
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   193
			printf( ' | ' . __( 'In reply to <a href="%1$s">%2$s</a>.' ), $parent_link, $name );
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   194
		}
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   195
	?>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   196
	</td>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   197
</tr>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   198
<tr>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   199
	<th scope="row"><?php _e( 'Submitted on' ); ?></th>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   200
	<td>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   201
	<?php
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   202
		/* translators: 2: comment date, 3: comment time */
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   203
		printf( __( '<a href="%1$s">%2$s at %3$s</a>' ),
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   204
			esc_url( get_comment_link( $comment->comment_ID ) ),
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   205
			/* translators: comment date format. See http://php.net/date */
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   206
			get_comment_date( __( 'Y/m/d' ) ),
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   207
			get_comment_date( get_option( 'time_format' ) )
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   208
		);
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   209
	?>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   210
	</td>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   211
</tr>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   212
<tr>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   213
<th scope="row"><?php /* translators: field name in comment form */ _ex('Comment', 'noun'); ?></th>
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   214
<td><?php echo $comment->comment_content; ?></td>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   215
</tr>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   216
</table>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   217
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   218
<form action="comment.php" method="get" class="comment-ays-submit">
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   219
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   220
<p>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   221
	<?php submit_button( $button, 'primary', 'submit', false ); ?>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   222
	<a href="<?php echo admin_url('edit-comments.php'); ?>" class="button-cancel"><?php esc_attr_e( 'Cancel' ); ?></a></td>
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   223
</p>
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   224
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   225
<?php wp_nonce_field( $nonce_action ); ?>
5
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   226
<input type="hidden" name="action" value="<?php echo esc_attr($formaction); ?>" />
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   227
<input type="hidden" name="c" value="<?php echo esc_attr($comment->comment_ID); ?>" />
5e2f62d02dcd upgrade wordpress + plugins
ymh <ymh.work@gmail.com>
parents: 0
diff changeset
   228
<input type="hidden" name="noredir" value="1" />
0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   229
</form>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   230
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   231
</div>
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   232
<?php
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   233
	break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   234
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   235
case 'deletecomment'    :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   236
case 'trashcomment'     :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   237
case 'untrashcomment'   :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   238
case 'spamcomment'      :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   239
case 'unspamcomment'    :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   240
case 'approvecomment'   :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   241
case 'unapprovecomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   242
	$comment_id = absint( $_REQUEST['c'] );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   243
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   244
	if ( in_array( $action, array( 'approvecomment', 'unapprovecomment' ) ) )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   245
		check_admin_referer( 'approve-comment_' . $comment_id );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   246
	else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   247
		check_admin_referer( 'delete-comment_' . $comment_id );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   248
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   249
	$noredir = isset($_REQUEST['noredir']);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   250
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   251
	if ( !$comment = get_comment($comment_id) )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   252
		comment_footer_die( __('Oops, no comment with this ID.') . sprintf(' <a href="%s">' . __('Go back') . '</a>.', 'edit-comments.php') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   253
	if ( !current_user_can( 'edit_comment', $comment->comment_ID ) )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   254
		comment_footer_die( __('You are not allowed to edit comments on this post.') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   255
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   256
	if ( '' != wp_get_referer() && ! $noredir && false === strpos(wp_get_referer(), 'comment.php') )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   257
		$redir = wp_get_referer();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   258
	elseif ( '' != wp_get_original_referer() && ! $noredir )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   259
		$redir = wp_get_original_referer();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   260
	elseif ( in_array( $action, array( 'approvecomment', 'unapprovecomment' ) ) )
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   261
		$redir = admin_url('edit-comments.php?p=' . absint( $comment->comment_post_ID ) );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   262
	else
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   263
		$redir = admin_url('edit-comments.php');
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   264
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   265
	$redir = remove_query_arg( array('spammed', 'unspammed', 'trashed', 'untrashed', 'deleted', 'ids', 'approved', 'unapproved'), $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   266
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   267
	switch ( $action ) {
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   268
		case 'deletecomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   269
			wp_delete_comment( $comment_id );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   270
			$redir = add_query_arg( array('deleted' => '1'), $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   271
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   272
		case 'trashcomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   273
			wp_trash_comment($comment_id);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   274
			$redir = add_query_arg( array('trashed' => '1', 'ids' => $comment_id), $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   275
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   276
		case 'untrashcomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   277
			wp_untrash_comment($comment_id);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   278
			$redir = add_query_arg( array('untrashed' => '1'), $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   279
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   280
		case 'spamcomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   281
			wp_spam_comment($comment_id);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   282
			$redir = add_query_arg( array('spammed' => '1', 'ids' => $comment_id), $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   283
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   284
		case 'unspamcomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   285
			wp_unspam_comment($comment_id);
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   286
			$redir = add_query_arg( array('unspammed' => '1'), $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   287
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   288
		case 'approvecomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   289
			wp_set_comment_status( $comment_id, 'approve' );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   290
			$redir = add_query_arg( array( 'approved' => 1 ), $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   291
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   292
		case 'unapprovecomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   293
			wp_set_comment_status( $comment_id, 'hold' );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   294
			$redir = add_query_arg( array( 'unapproved' => 1 ), $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   295
			break;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   296
	}
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   297
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   298
	wp_redirect( $redir );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   299
	die;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   300
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   301
case 'editedcomment' :
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   302
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   303
	$comment_id = absint( $_POST['comment_ID'] );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   304
	$comment_post_id = absint( $_POST['comment_post_ID'] );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   305
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   306
	check_admin_referer( 'update-comment_' . $comment_id );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   307
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   308
	edit_comment();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   309
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   310
	$location = ( empty( $_POST['referredby'] ) ? "edit-comments.php?p=$comment_post_id" : $_POST['referredby'] ) . '#comment-' . $comment_id;
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   311
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   312
	/**
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   313
	 * Filter the URI the user is redirected to after editing a comment in the admin.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   314
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   315
	 * @since 2.1.0
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   316
	 *
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   317
	 * @param string $location The URI the user will be redirected to.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   318
	 * @param int $comment_id The ID of the comment being edited.
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   319
	 */
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   320
	$location = apply_filters( 'comment_edit_redirect', $location, $comment_id );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   321
	wp_redirect( $location );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   322
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   323
	exit();
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   324
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   325
default:
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   326
	wp_die( __('Unknown action.') );
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   327
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   328
} // end switch
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   329
d970ebf37754 first import
ymh <ymh.work@gmail.com>
parents:
diff changeset
   330
include( ABSPATH . 'wp-admin/admin-footer.php' );