From 4ea3a099b05fa910498bfbf1b2d7387118355472 Mon Sep 17 00:00:00 2001
From: "Ole Mathias Aa. Heggem" <olemathias.aa.heggem@gmail.com>
Date: Sun, 13 Apr 2025 07:18:45 +0200
Subject: Upgrade bootstrap and rewrite API (#230)

---
 web/api/write/config | 22 ----------------------
 1 file changed, 22 deletions(-)
 delete mode 100755 web/api/write/config

(limited to 'web/api/write/config')

diff --git a/web/api/write/config b/web/api/write/config
deleted file mode 100755
index 468bf6a..0000000
--- a/web/api/write/config
+++ /dev/null
@@ -1,22 +0,0 @@
-#! /usr/bin/perl
-# vim:ts=8:sw=8
-use lib '/opt/gondul/include';
-use utf8;
-use nms;
-use nms::web qw($dbh db_safe_quote get_input finalize_output);
-
-use strict;
-use warnings;
-
-my $in = get_input();
-my %tmp = %{JSON::XS::decode_json($in)};
-
-my $q = $nms::web::dbh->prepare("INSERT INTO config (publicvhost,shortname,data) VALUES(?,?,?);");
-$q->execute($tmp{'publicvhost'},$tmp{'shortname'},JSON::XS::encode_json($tmp{'data'}));
-
-$nms::web::cc{'max-age'} = '0';
-$nms::web::cc{'stale-while-revalidate'} = '0';
-$nms::web::json{'state'} = 'ok';
-
-print "X-ban: /api/public/config\n";
-finalize_output();
-- 
cgit v1.2.3