aboutsummaryrefslogtreecommitdiff
path: root/mod/tabbed_profile/actions/deletecomment.php
diff options
context:
space:
mode:
Diffstat (limited to 'mod/tabbed_profile/actions/deletecomment.php')
-rw-r--r--mod/tabbed_profile/actions/deletecomment.php29
1 files changed, 29 insertions, 0 deletions
diff --git a/mod/tabbed_profile/actions/deletecomment.php b/mod/tabbed_profile/actions/deletecomment.php
new file mode 100644
index 000000000..233d53069
--- /dev/null
+++ b/mod/tabbed_profile/actions/deletecomment.php
@@ -0,0 +1,29 @@
+<?php
+/**
+ * Elgg profile commentwall: delete message action
+ */
+
+// Ensure we're logged in
+if (!isloggedin()) forward();
+
+// Make sure we can get the comment in question
+$annotation_id = (int) get_input('annotation_id');
+
+//make sure that there is a message on the commentwall matching the passed id
+if ($message = get_annotation($annotation_id)) {
+ //grab the user or group entity
+ $entity = get_entity($message->entity_guid);
+ //check to make sure the current user can actually edit the commentwall
+ if ($message->canEdit()) {
+ //delete the comment
+ $message->delete();
+ //display message
+ system_message(elgg_echo("profile:commentwall:deleted"));
+ forward(REFERER);
+ }
+
+} else {
+ system_message(elgg_echo("profile:commentwall:notdeleted"));
+}
+
+forward(REFERER); \ No newline at end of file