From 10e5db3119afca7060a680517393518be3aa54ab Mon Sep 17 00:00:00 2001
From: ben <ben@36083f99-b078-4883-b0ff-0f9b5a30f544>
Date: Fri, 27 Jun 2008 15:20:33 +0000
Subject: Brought generic comments into Elgg core

git-svn-id: https://code.elgg.org/elgg/trunk@1185 36083f99-b078-4883-b0ff-0f9b5a30f544
---
 actions/comments/delete.php | 35 +++++++++++++++++++++++++++++++++++
 1 file changed, 35 insertions(+)
 create mode 100644 actions/comments/delete.php

(limited to 'actions/comments/delete.php')

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
-- 
cgit v1.2.3