aboutsummaryrefslogtreecommitdiffstats
path: root/web/js
ModeNameSize
-rw-r--r--OpenLayers.Projection.CH1903Plus.js4236logstatsplain
-rw-r--r--contact.js587logstatsplain
-rw-r--r--dashboard.js9754logstatsplain
-rw-r--r--dropzone.js.patch2332logstatsplain
-rw-r--r--duplicates.js10365logstatsplain
-rw-r--r--front.js1193logstatsplain
-rw-r--r--geolocation.js1763logstatsplain
-rw-r--r--lazyload.js927logstatsplain
-rw-r--r--loading-attribute-polyfill.js7230logstatsplain
-rw-r--r--map-OpenLayers.js53546logstatsplain
-rw-r--r--map-OpenStreetMap.js3908logstatsplain
-rw-r--r--map-bing-ol.js3639logstatsplain
-rw-r--r--map-cheshireeast.js1719logstatsplain
-rw-r--r--map-fms.js3216logstatsplain
-rw-r--r--map-google-ol.js2063logstatsplain
-rw-r--r--map-google.js8616logstatsplain
-rw-r--r--map-mastermap.js838logstatsplain
-rw-r--r--map-streetview.js1561logstatsplain
-rw-r--r--map-toner-lite.js619logstatsplain
-rw-r--r--map-wms-base.js655logstatsplain
-rw-r--r--map-wms-northamptonshire.js1074logstatsplain
-rw-r--r--map-wmts-base.js1209logstatsplain
-rw-r--r--map-wmts-bristol.js3390logstatsplain
-rw-r--r--map-wmts-buckinghamshire.js3775logstatsplain
-rw-r--r--map-wmts-hounslow.js5275logstatsplain
-rw-r--r--map-wmts-isleofwight.js4689logstatsplain
-rw-r--r--map-wmts-zurich.js3989logstatsplain
d---------src35logstatsplain
-rw-r--r--validation_rules.js345logstatsplain
class="nb">shift; return exists $CONFIG{$key} ? $CONFIG{$key} : undef; } sub override_config($&) { my $config = shift; my $code = \&{shift @_}; mySociety::MaPit::configure($config->{MAPIT_URL}) if $config->{MAPIT_URL}; # NB: though we have this, templates tend to use [% c.config %]. # This overriding happens after $c->config is set, so note that # FixMyStreet::App->setup_request rewrites $c->config if we are in # test_mode, so tests should Just Work there too. my $override_guard = Sub::Override->new( "FixMyStreet::config", sub { my ($class, $key) = @_; return { %CONFIG, %$config } unless $key; return $config->{$key} if exists $config->{$key}; my $orig_config = mySociety::Config::load_default(); return $orig_config->{$key} if exists $orig_config->{$key}; } ); FixMyStreet::Map::reload_allowed_maps() if $config->{MAP_TYPE}; $code->(); $override_guard->restore(); mySociety::MaPit::configure() if $config->{MAPIT_URL}; FixMyStreet::Map::reload_allowed_maps() if $config->{MAP_TYPE}; } =head2 dbic_connect_info $connect_info = FixMyStreet->dbic_connect_info; Returns the array that DBIx::Class::Schema needs to connect to the database. Most of the values are read from the config file and others are hordcoded here. =cut # for exact details on what this could return refer to: # # http://search.cpan.org/dist/DBIx-Class/lib/DBIx/Class/Storage/DBI.pm#connect_info # # we use the one that is most similar to DBI's connect. sub dbic_connect_info { my $class = shift; my $config = $class->config; my $dsn = "dbi:Pg:dbname=" . $config->{FMS_DB_NAME}; $dsn .= ";host=$config->{FMS_DB_HOST}" if $config->{FMS_DB_HOST}; $dsn .= ";port=$config->{FMS_DB_PORT}" if $config->{FMS_DB_PORT}; $dsn .= ";sslmode=allow"; my $user = $config->{FMS_DB_USER} || undef; my $password = $config->{FMS_DB_PASS} || undef; my $dbi_args = { AutoCommit => 1, pg_enable_utf8 => 1, }; my $dbic_args = {}; return ( $dsn, $user, $password, $dbi_args, $dbic_args ); } my $tz; my $tz_f; sub local_time_zone { $tz //= DateTime::TimeZone->new( name => "local" ); return $tz; } sub time_zone { $tz_f //= DateTime::TimeZone->new( name => FixMyStreet->config('TIME_ZONE') ) if FixMyStreet->config('TIME_ZONE'); return $tz_f; } sub set_time_zone { my ($class, $dt) = @_; my $tz = local_time_zone(); my $tz_f = time_zone(); $dt->set_time_zone($tz); $dt->set_time_zone($tz_f) if $tz_f; return $dt; } # Development functions sub staging_flag { my ($cls, $flag, $value) = @_; $value = 1 unless defined $value; return unless $cls->config('STAGING_SITE'); my $flags = $cls->config('STAGING_FLAGS'); unless ($flags && ref $flags eq 'HASH') { # Assume all flags 0 if missing return !$value; } return $flags->{$flag} == $value; } 1;