Run: github-release-message.pl sympa-community/sympa 6.2.70
.
#! /usr/bin/env perl
use strict;
use warnings;
use English qw(-no_match_vars);
use JSON;
Run: github-release-message.pl sympa-community/sympa 6.2.70
.
#! /usr/bin/env perl
use strict;
use warnings;
use English qw(-no_match_vars);
use JSON;
#! /bin/bash -e | |
export PERL5LIB="/home/sympa/bin:/home/sympa/lib/perl5" | |
/home/sympa/write-sympa-conf | |
/home/sympa/bin/sympa.pl | |
#-------------- | |
# Using alias pipe definitions for the Sympa lists in /etc/mail/sympa/aliases | |
sympa_aliases: | |
debug_print = "R: system_aliases for $local_part@$domain" | |
driver = redirect | |
domains = +local_domains | |
allow_fail | |
allow_defer | |
data = ${lookup{$local_part}lsearch{/etc/mail/sympa/aliases}} | |
user = sympa |
package PerlDance::Schema::Upgrades::2016; | |
use Moo; | |
use DateTime; | |
has schema => ( | |
is => 'ro', | |
required => 1, | |
); |
git filter-branch \ | |
--prune-empty \ | |
--index-filter ' | |
git ls-tree -z -r --name-only --full-tree $GIT_COMMIT \ | |
| grep -z -v "^applications/CalevoMobile/lib/CalevoMobile/Schema" \ | |
| xargs -0 -r git rm --cached -r | |
' \ | |
-- \ | |
feature/split_out_schema | |
git filter-branch \ |
#!/usr/bin/env perl | |
use warnings; | |
use strict; | |
use Dancer qw/:script/; | |
use Dancer::Plugin::DBIC; | |
use DBIx::Class::DeploymentHandler; | |
my $schema = schema; |
#!/bin/bash | |
# determine camp number | |
for CAMPDIR in "$PWD" "${PWD%/*}" "${PWD%/*/*}"; do | |
if [[ $CAMPDIR =~ ([[:digit:]]+)$ ]]; then | |
CAMPNUMBER=${BASH_REMATCH[1]} | |
break | |
fi | |
done |
package Dancer::Plugin::Interchange5::SessionCrossover; | |
use warnings; | |
use strict; | |
use Dancer::Plugin; | |
use Dancer qw/:syntax/; | |
use Storable qw/thaw freeze/; | |
# this plugin nesting is not going to work with D2, until further notice :-\ | |
use Dancer::Plugin::Database; |
#!/usr/bin/env perl | |
use strict; | |
use warnings; | |
use File::Spec; | |
use File::Copy::Recursive qw/rcopy/; | |
use File::Find; | |
use Data::Dumper; | |
use XML::Twig; | |
use File::Path qw/mkpath/; |
#! /usr/bin/env perl | |
use strict; | |
use warnings; | |
use Dancer ':script'; | |
use Getopt::Long; | |
use Dancer::Plugin::Interchange6; | |
my $duration; |