aboutsummaryrefslogtreecommitdiff
path: root/actions/comments/delete.php
diff options
context:
space:
mode:
Diffstat (limited to 'actions/comments/delete.php')
-rw-r--r--actions/comments/delete.php35
1 files changed, 35 insertions, 0 deletions
diff --git a/actions/comments/delete.php b/actions/comments/delete.php
new file mode 100644
index 000000000..26875942c
--- /dev/null
+++ b/actions/comments/delete.php
@@ -0,0 +1,35 @@
+<?php
+
+ /**
+ * Elgg delete comment action
+ *
+ * @package Elgg
+ * @license http://www.gnu.org/licenses/old-licenses/gpl-2.0.html GNU Public License version 2
+ * @author Curverider <curverider.co.uk>
+ * @copyright Curverider Ltd 2008
+ * @link http://elgg.org/
+ */
+
+ // Ensure we're logged in
+ if (!isloggedin()) forward();
+
+ // Make sure we can get the comment in question
+ $annotation_id = (int) get_input('annotation_id');
+ if ($comment = get_annotation($annotation_id)) {
+
+ $entity = get_entity($comment->entity_guid);
+
+ if ($comment->canEdit()) {
+ $comment->delete();
+ system_message(elgg_echo("generic_comment:deleted"));
+ forward($entity->getURL());
+ }
+
+ } else {
+ $url = "";
+ }
+
+ system_message(elgg_echo("generic_comment:notdeleted"));
+ forward($entity->getURL());
+
+?> \ No newline at end of file