rough widget profile plugin

git-svn-id: http://code.elgg.org/elgg/trunk@7676 36083f99-b078-4883-b0ff-0f9b5a30f544

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