Welcome to the CHICKEN Scheme pasting service

deploy hacks added by mario-goulart on Tue Sep 25 19:08:54 2012

#! /bin/sh

# Name of my app (egg name) to be deployed
myapp=awful-app

# Path the the chicken-update-eggs.scm script
cue=$HOME/src/github/chicken-update-eggs/chicken-update-eggs.scm

# Alternative location for eggs required by the app to be deployed
export eggsdir=$PWD/eggs

# Deployment dir
export deploydir=$PWD/deploy-dir

if [ ! -d "$eggsdir" ]; then
    mkdir -p $eggsdir/lib/chicken/6
    chicken-install -i $eggsdir/lib/chicken/6
fi

[ -d "$deploydir" ] || mkdir -p $deploydir

# install $myapp in $eggsdir
CHICKEN_INCLUDE_PATH=$eggsdir/share/chicken CHICKEN_REPOSITORY=$eggsdir/lib/chicken/6 chicken-install -p $eggsdir

# deploy everything
cmd=`CUE_DEPLOY_DIR=$deploydir csi -s $cue --dry-run $eggsdir $deploydir | sed "s/ $myapp/ /"`

CHICKEN_INCLUDE_PATH=$eggsdir/share/chicken CHICKEN_REPOSITORY=$eggsdir/lib/chicken/6 CUE_DEPLOY_DIR=$deploydir $cmd
chicken-install -deploy -p $deploydir

Your annotation:

Enter a new annotation:

Your nick:
The title of your paste:
Your paste (mandatory) :
Which one-argument R5RS procedure returns 1 when given `'(1 2 3)' as input?
Visually impaired? Let me spell it for you (wav file) download WAV