bin/gal-mj-init

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