bin/gal-mj-init

   1 #!/bin/sh
   2 # This creates a gallery with MJ's default configuration
   3
   4 set -e
   5
   6 if [ -f gallery.cf ] ; then
   7         echo >&2 'gallery.cf already present, giving up!'
   8         exit 1
   9 fi
  10
  11 cat >gallery.cf <<'AMEN'
  12 use common::sense;
  13
  14 my $gal = require '../../default.cf';
  15 $gal->set(
  16         Title => 'Unnamed',
  17 );
  18
  19 return $gal;
  20 AMEN