preaction

cpantesters@cpantesters4:~$ find reports-dir/_meta/timestamp -type f | xargs cat | wc -l
44987
cpantesters@cpantesters4:~$ du -sh reports-dir/
614M    reports-dir/

Exportable Squashfs 4.0 filesystem, lz4 compressed, data block size 131072
        compressed data, compressed metadata, compressed fragments, compressed xattrs
        duplicates are removed
Filesystem size 127003.50 Kbytes (124.03 Mbytes)
        30.41% of uncompressed filesystem size (417572.73 Kbytes)

preaction

-- stats()
EXPLAIN SELECT SUM(job.id IS NOT NULL) AS is_active 
FROM minion_workers worker 
LEFT JOIN minion_jobs job ON worker.id = job.worker AND job.state = 'active'
GROUP BY worker.id;

EXPLAIN SELECT state, COUNT(state) AS jobs, SUM(`delayed` > NOW()) AS `delayed`
FROM minion_jobs
GROUP BY state;

preaction

title	published
A Blog Post	2021-03-21

This will appear in the blog because it has a published field in the frontmatter.

preaction

package Log::Any;

=head1 SYNOPSIS

    ### Basic use
    # Get a logger that logs to STDERR
    use Log::Any;
    my $log = Log::Any->new;
    
    # Shortcut

preaction

sub register( $self, $site ) {
    $site->on( build => sub( $event ) {
        for my $page ( $event->pages->@* ) {
            $page->dom->find( 'img[src$=.mp3]' )->each( sub( $el ) {
                $el->replace( '<audio controls><source type="audio/mp3" src="%s"></audio>', $el->attr( 'src' ) );
            } );
        }
    } );
}

preaction

package Yancy::Backend::DBI;

use Mojo::Base -base, -signatures;
use Yancy::Util qw( fill_brackets );
use SQL::Abstract;

my %MAP = (
    # schema_name => mapping
    #   Mapping can be...
    #       { table => $table_name }            # Standard SQL from SQL::Abstract

preaction

user  nginx;
worker_processes  auto;

error_log  /var/log/nginx/error.log warn;
pid        /var/run/nginx.pid;


events {
    worker_connections  1024;

preaction

my $schema = $app->yancy->schema;
for my $key ( keys %$schema ) {
    my $props = $schema->{ $key }{ properties };
    $schema->{ $key }{ 'x-list-columns' } = [ grep { $props->{$_}{format} ne 'textarea' } keys %$props ];
} 

preaction

diff --git a/lib/Mojolicious/Plugin/Yancy.pm b/lib/Mojolicious/Plugin/Yancy.pm
index 7ed3e54..6ae923e 100644
--- a/lib/Mojolicious/Plugin/Yancy.pm
+++ b/lib/Mojolicious/Plugin/Yancy.pm
@@ -892,6 +892,10 @@ sub _helper_validate {
     for my $prop_name ( keys %{ $schema->{properties} } ) {
         my $prop = $schema->{properties}{ $prop_name };

+        # These blocks fix problems with validation only. If the
+        # problem is the database understanding the value, it must be

preaction

package MyApp::Controller::ModifiedBy;
use Mojo::Base 'Yancy::Controller::Yancy';

sub _add_modified_by {
    my ( $c ) = @_;
    $c->req->param( modified_by => $c->current_uid );
    if ( my $item = $c->req->json ) {
        $item->{ modified_by } = $c->current_uid;
    }
}