aboutsummaryrefslogtreecommitdiffstats
path: root/web/nms.gathering.org/comment.pl
diff options
context:
space:
mode:
authorKristian Lyngstol <kly@kly.no>2016-03-04 17:47:56 +0000
committerKristian Lyngstol <kly@kly.no>2016-03-04 17:47:56 +0000
commitaafd5a80db7b5ee27d1c432a4db93da48fbecb8a (patch)
tree3235337d8488228ea54a5c9dd6a1b6b67474aaa2 /web/nms.gathering.org/comment.pl
parent289a855db874aefa4ae90f0029555ada4383fbbc (diff)
nms: Rename API end points and separate public/private
Diffstat (limited to 'web/nms.gathering.org/comment.pl')
-rwxr-xr-xweb/nms.gathering.org/comment.pl15
1 files changed, 0 insertions, 15 deletions
diff --git a/web/nms.gathering.org/comment.pl b/web/nms.gathering.org/comment.pl
deleted file mode 100755
index 7a45d76..0000000
--- a/web/nms.gathering.org/comment.pl
+++ /dev/null
@@ -1,15 +0,0 @@
-#! /usr/bin/perl
-# vim:ts=8:sw=8
-
-use lib '../../include';
-use nms::web;
-use strict;
-use warnings;
-
-my $query = $nms::web::dbh->prepare('select sysname,extract(epoch from date_trunc(\'second\',time)) as time,state,username,id,comment from switch_comments natural join switches where state != \'delete\' order by time desc');
-$query->execute();
-while (my $ref = $query->fetchrow_hashref()) {
- push @{$nms::web::json{'comments'}{$ref->{'sysname'}}{'comments'}},$ref;
-}
-
-nms::web::finalize_output();