Dave Cross: Still Munging Data With Perl: Online event - Mar 27 Learn more

#! /usr/bin/env perl # -*- perl -*-
# Copyright (C) 2016-2018 Guido Flohr <guido.flohr@cantanea.com>,
# all rights reserved.
# This program is free software: you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
# the Free Software Foundation; either version 3 of the License, or
# (at your option) any later version.
# This program is distributed in the hope that it will be useful,
# but WITHOUT ANY WARRANTY; without even the implied warranty of
# MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the
# GNU General Public License for more details.
# You should have received a copy of the GNU General Public License
# along with this program. If not, see <http://www.gnu.org/licenses/>.
use strict;
BEGIN {
my $test_dir = __FILE__;
$test_dir =~ s/[-a-z0-9]+\.t$//i;
unshift @INC, $test_dir;
}
use constant true => $JSON::PP::true;
use constant false => $JSON::PP::false;
my $site = TestSite->new(name => 'config-default');
my $config = Qgoda->dumpConfig;
ok $config;
$config = YAML::XS::Load($config);
$site->tearDown;
my $srcdir = Cwd::abs_path() . '/t/config-default';
my $expected = <<EOF;
---
case-sensitive: false
compare-output: true
defaults: []
exclude: []
exclude-watch: []
front-matter-placeholder:
'*': "[% '' %]\\n"
generator: Qgoda v0.9.3 (http://www.qgoda.net/)
helpers: {}
index: index
latency: 0.5
location: /{directory}/{basename}/{index}{suffix}
no-scm: []
paths:
plugins: _plugins
po: _po
site: $srcdir/_site
timestamp: _timestamp
views: _views
permalink: '{significant-path}'
po:
copyright-holder: Set config.po.copyright-holder in '_config.yaml'.
mdextra: []
msgfmt: [msgfmt]
msgid-bugs-address: Set config.po.msgid-bugs-address in '_config.yaml'.
msgmerge: [msgmerge]
qgoda: [qgoda]
reload: false
textdomain: messages
tt2:
- _views
xgettext: [xgettext]
xgettext-tt2: [xgettext-tt2]
processors:
chains:
html:
modules:
- TT2
- Strip
- HTMLFilter
markdown:
modules:
- TT2
- Strip
- Markdown
suffix: html
wrapper: html
xml:
modules:
- TT2
- Strip
options:
HTMLFilter:
AnchorTarget: {}
Generator: {}
CleanUp: {}
TOC:
content-tag: qgoda-content
end: 6
start: 2
template: components/toc.html
toc-tag: qgoda-toc
triggers:
htm: html
html: html
md: markdown
mdown: markdown
mdwn: markdown
mkd: markdown
mkdn: markdown
xml: xml
srcdir: $srcdir
taxonomies:
categories: 3
links: 1
tags: 2
title: A new Qgoda Powered Site
view: default.html
EOF
$expected = Load($expected);
is_deeply $config, $expected, 'default config should not change';
done_testing;