bluto

Release package and announcement generator
Info | Log | Files | Refs | README | LICENSE

genconfig.pl (563B)

      1 #!/usr/bin/env perl
      2 
      3 use Config::Simple;
      4 
      5 my @keys = (
      6 	'main.name',
      7 	'main.slug',
      8 	'main.version',
      9 	'main.summary',
     10 	'main.license',
     11 	'main.uri',
     12 	'main.tech',
     13 	'vcs.tag_prefix',
     14 	'author:maintainer.name',
     15 	'author:maintainer.email',
     16 	'author:maintainer.pgp',
     17 	'key.rsa',
     18 	'key.ed25519',
     19 	'key.secp256k1',
     20 	'fund.btc',
     21 	'fund.eth',
     22 	'fund.monero',
     23 	'locate.www',
     24 	'locate.vcs',
     25 	'locate.tgzbase',
     26 );
     27 
     28 my $cfg = new Config::Simple(syntax=>'ini');
     29 for my $k ( @keys ) {
     30 	$cfg->param($k, '');
     31 }
     32 
     33 $cfg->param('changelog.0.0.0-alpha.1',  '');
     34 
     35 print $cfg->as_string;