From 0bf17c03c2de8423045bf59b83d1e6d12ed7ca42 Mon Sep 17 00:00:00 2001
From: marcus <marcus@36083f99-b078-4883-b0ff-0f9b5a30f544>
Date: Wed, 24 Sep 2008 15:09:49 +0000
Subject: Introducing API key administration panel

git-svn-id: https://code.elgg.org/elgg/trunk@2114 36083f99-b078-4883-b0ff-0f9b5a30f544
---
 mod/apiadmin/actions/revokekey.php | 22 ++++++++++++++++++++++
 1 file changed, 22 insertions(+)
 create mode 100644 mod/apiadmin/actions/revokekey.php

(limited to 'mod/apiadmin/actions/revokekey.php')

diff --git a/mod/apiadmin/actions/revokekey.php b/mod/apiadmin/actions/revokekey.php
new file mode 100644
index 000000000..eeb5dd791
--- /dev/null
+++ b/mod/apiadmin/actions/revokekey.php
@@ -0,0 +1,22 @@
+<?php
+
+	global $CONFIG;
+	
+	admin_gatekeeper();
+	
+	$key = (int)get_input('keyid');
+	
+	$obj = get_entity($key);
+	
+	if (($obj) && ($obj instanceof ElggObject) && ($obj->subtype == get_subtype_id('object', 'api_key')))
+	{
+		if ($obj->delete())
+			system_message(elgg_echo('apiadmin:keyrevoked'));
+		else
+			register_error(elgg_echo('apiadmin:keynotrevoked'));
+	}
+	else
+		register_error(elgg_echo('apiadmin:keynotrevoked'));
+		
+	forward($_SERVER['HTTP_REFERER']);
+?>
\ No newline at end of file
-- 
cgit v1.2.3