From 433eb88b1934ab31a7f067490fa8dd79c41270ff Mon Sep 17 00:00:00 2001
From: marcus <marcus@36083f99-b078-4883-b0ff-0f9b5a30f544>
Date: Fri, 9 Jan 2009 18:05:36 +0000
Subject: Closes #240: It is now possible to downgrade an admin user.

git-svn-id: https://code.elgg.org/elgg/trunk@2558 36083f99-b078-4883-b0ff-0f9b5a30f544
---
 actions/admin/user/makeadmin.php   |  4 ++--
 actions/admin/user/removeadmin.php | 37 +++++++++++++++++++++++++++++++++++++
 2 files changed, 39 insertions(+), 2 deletions(-)
 create mode 100644 actions/admin/user/removeadmin.php

(limited to 'actions/admin')

diff --git a/actions/admin/user/makeadmin.php b/actions/admin/user/makeadmin.php
index 6466966c9..a4f202cb5 100644
--- a/actions/admin/user/makeadmin.php
+++ b/actions/admin/user/makeadmin.php
@@ -23,8 +23,8 @@
 	
 	if ( ($obj instanceof ElggUser) && ($obj->canEdit()))
 	{
-		$result = $obj->admin = 'yes';
-		if ($result)
+		$obj->admin = 'yes';
+		if ($obj->admin)
 			system_message(elgg_echo('admin:user:makeadmin:yes'));
 		else
 			register_error(elgg_echo('admin:user:makeadmin:no'));
diff --git a/actions/admin/user/removeadmin.php b/actions/admin/user/removeadmin.php
new file mode 100644
index 000000000..16293bb74
--- /dev/null
+++ b/actions/admin/user/removeadmin.php
@@ -0,0 +1,37 @@
+<?php
+	/**
+	 * Make another user an admin.
+	 * 
+	 * @package Elgg
+	 * @subpackage Core
+	 * @license http://www.gnu.org/licenses/old-licenses/gpl-2.0.html GNU Public License version 2
+	 * @author Curverider Ltd
+	 * @copyright Curverider Ltd 2008
+	 * @link http://elgg.org/
+	 */
+
+	require_once(dirname(dirname(dirname(dirname(__FILE__)))) . "/engine/start.php");
+	global $CONFIG;
+	
+	// block non-admin users
+	admin_gatekeeper();
+	action_gatekeeper();
+	
+	// Get the user 
+	$guid = get_input('guid');
+	$obj = get_entity($guid);
+	
+	if ( ($obj instanceof ElggUser) && ($obj->canEdit()))
+	{
+		$obj->admin = '';
+		if (!$obj->admin)
+			system_message(elgg_echo('admin:user:removeadmin:yes'));
+		else
+			register_error(elgg_echo('admin:user:removeadmin:no'));
+	}
+	else
+		register_error(elgg_echo('admin:user:removeadmin:no'));
+	
+	forward($_SERVER['HTTP_REFERER']);
+
+?>
\ No newline at end of file
-- 
cgit v1.2.3