From bd1864363fada1c3122b053b83c4d8b9526bbfa3 Mon Sep 17 00:00:00 2001
From: Silvio Rhatto <rhatto@riseup.net>
Date: Sat, 15 Mar 2014 14:48:09 -0300
Subject: Squashed 'mod/bulk_user_admin/' content from commit 17664c9

git-subtree-dir: mod/bulk_user_admin
git-subtree-split: 17664c9c5af5ee2d74b7c378ccc52ee65074ad6c
---
 actions/bulk_user_admin/delete.php | 30 ++++++++++++++++++++++++++++++
 1 file changed, 30 insertions(+)
 create mode 100644 actions/bulk_user_admin/delete.php

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

diff --git a/actions/bulk_user_admin/delete.php b/actions/bulk_user_admin/delete.php
new file mode 100644
index 000000000..0d7a7e7df
--- /dev/null
+++ b/actions/bulk_user_admin/delete.php
@@ -0,0 +1,30 @@
+<?php
+/**
+ * Bulk delete users
+ */
+
+$guids = get_input('bulk_user_admin_guids');
+$errors = array();
+
+foreach ($guids as $guid) {
+	$user = get_entity($guid);
+
+	if (!$user instanceof ElggUser) {
+		$errors[] = "$guid is not a user.";
+		continue;
+	}
+
+	if (!$user->delete()) {
+		$errors[] = "Could not delete $user->name ($user->username).";
+	}
+}
+
+if ($errors) {
+	foreach ($errors as $error) {
+		register_error($error);
+	}
+} else {
+	system_message("Users deleted.");
+}
+
+forward(REFERER);
-- 
cgit v1.2.3