From 709c78569b26677624e60588fa1166dc659ac93c Mon Sep 17 00:00:00 2001 From: Ole Mathias Heggem Date: Sat, 21 Jan 2023 19:07:38 +0100 Subject: chore: cleanup repo --- web/nms.gathering.org/api/read/comments | 15 --------------- 1 file changed, 15 deletions(-) delete mode 100755 web/nms.gathering.org/api/read/comments (limited to 'web/nms.gathering.org/api/read/comments') diff --git a/web/nms.gathering.org/api/read/comments b/web/nms.gathering.org/api/read/comments deleted file mode 100755 index 4adfb2b..0000000 --- a/web/nms.gathering.org/api/read/comments +++ /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(); -- cgit v1.2.3