From: Michael Rasmussen <mir@datanom.net>
Date: Wed, 24 Jun 2015 22:27:06 +0000 (+0200)
Subject: First upload of wblist page
X-Git-Url: http://git.datanom.net/qtadmin.git/commitdiff_plain/df10d813dab5e6a440ae81cf71d3355b02057a3d

First upload of wblist page
---

diff --git a/wblist.php b/wblist.php
new file mode 100644
index 0000000..7746869
--- /dev/null
+++ b/wblist.php
@@ -0,0 +1,22 @@
+<?php
+/* vim: set ts=4 tw=0 sw=4 noet: */
+    require_once 'config.php';
+    require_once $CFG->root . 'lib/utils.inc.php';
+
+    $util = new Utils;
+
+    if ($util->isLoggedIn()) {
+        $util->setHeading('WB List and Quarantine Administration');
+        echo $util->getHeader();
+        echo $util->getHeading();
+		$list = $util->makeRestCall('/show');
+		if ($list) {
+			$out = var_export($list, true);
+		} else {
+			$out = '<p>Connection to REST service failed</p>';
+		echo $out;
+        echo $util->getFooter();
+    } else {
+        header('Location: auth.php');
+    }
+?>
\ No newline at end of file