diff options
Diffstat (limited to 'bin')
-rw-r--r-- | bin/fetch-comments-24hs | 26 | ||||
-rwxr-xr-x | bin/make_css | 2 | ||||
-rwxr-xr-x | bin/open311-populate-service-list | 2 |
3 files changed, 28 insertions, 2 deletions
diff --git a/bin/fetch-comments-24hs b/bin/fetch-comments-24hs new file mode 100644 index 000000000..b84f09ba7 --- /dev/null +++ b/bin/fetch-comments-24hs @@ -0,0 +1,26 @@ +#!/usr/bin/env perl + +use strict; +use warnings; +use DateTime; +use DateTime::Format::W3CDTF; +require 5.8.0; + +use FixMyStreet::App; +use CronFns; +my ($verbose, $nomail) = CronFns::options(); + +use Open311; +use Open311::GetServiceRequestUpdates; + +my $dt = DateTime->now(); +my $dt_24hrs_ago = $dt->clone; +$dt_24hrs_ago->add( hours => -24 ); + +my $updates = Open311::GetServiceRequestUpdates->new( + verbose => 1, + start_date => DateTime::Format::W3CDTF->format_datetime( $dt_24hrs_ago ), + end_date => DateTime::Format::W3CDTF->format_datetime( $dt ) +); + +$updates->fetch; diff --git a/bin/make_css b/bin/make_css index 392d7d7d7..a86fd4f0d 100755 --- a/bin/make_css +++ b/bin/make_css @@ -14,7 +14,7 @@ DIRECTORY=$(cd `dirname $0`/../web && pwd) # FixMyStreet uses compass -NEWSTYLE=${1:-"fixmystreet bromley fixmybarangay barnet zurich default"} +NEWSTYLE=${1:-"fixmystreet bromley fixmybarangay barnet zurich default stevenage"} NEWSTYLE_REGEX=${NEWSTYLE// /\\|} for site in $NEWSTYLE; do compass compile --output-style compressed $DIRECTORY/cobrands/$site diff --git a/bin/open311-populate-service-list b/bin/open311-populate-service-list index 392b86dbd..232b0a6d4 100755 --- a/bin/open311-populate-service-list +++ b/bin/open311-populate-service-list @@ -1,4 +1,4 @@ -#!/usr/bin/perl +#!/usr/bin/env perl use strict; use warnings; |