brennen/wrt - wrt - p1k3 gitea

Almost-minimal filesystem based blog.

17 lines

339 B

Raw Permalink Normal View History

scrap test.pl in favor of ./Build test

8 years ago

eval_perl() returns string, hides errors Moar memory, less potential confusion doing it in place. Also made it send errors to the log instead of displaying them.

12 years ago

switch to wrt.json for configuration

7 years ago

eval_perl() returns string, hides errors Moar memory, less potential confusion doing it in place. Also made it send errors to the log instead of displaying them.

12 years ago

v4.0.0: rename WRT to App::WRT I went and read: https://pause.perl.org/pause/authenquery?ACTION=pause_namingmodules Realized I should probably not name this something with an inscrutable top-level namespace. WRT is still inscrutable, I guess, but at least it's now under App. - Renames all modules, fixes tests (such as they are) - Zaps old t/validate/ stuff

6 years ago

eval_perl() returns string, hides errors Moar memory, less potential confusion doing it in place. Also made it send errors to the log instead of displaying them.

12 years ago

handle sites with an index file in the root - adds an example "flat" site with, for now, a single index in root for testing purposes - wrt-render-all handles default entry instead of just using "new" - EntryStore::all_renderable() correctly filters out paths ending in "/index" instead of "index", which if nothing else corrects a subtle bug that would have gotten in the way of naming something "windex" - WRT::handle() will return the contents of a root-level "index"

4 years ago

mild refactor of display() & some comment / dead code cleanup - moves template existence check to new() - uses file_get_contents() instead of usual file slurping boilerplate - documents overlay option - deletes superfluous entry_wrapped() - tidies some commments

6 years ago

12 years ago

first pass at renaming display and Display.pm to wrot / WROT.pm

7 years ago

eval_perl() returns string, hides errors Moar memory, less potential confusion doing it in place. Also made it send errors to the log instead of displaying them.

12 years ago

#!/usr/bin/env perl
use strict;
use warnings;

use lib 'lib';

use Test::Simple tests => 1; # last test to print
use App::WRT;

chdir 'example/blog';
my $w = App::WRT::new_from_file('wrt.json');

# 'configuration';
my $perlcode = $w->eval_perl("IS <perl>return 'TRUE';</perl>");
ok ($perlcode eq 'IS TRUE', 'eval_perl in line_parse');

1;