diff options
| author | dakkar <dakkar@luxion> | 2006-02-13 15:53:39 +0000 |
|---|---|---|
| committer | dakkar <dakkar@luxion> | 2006-02-13 15:53:39 +0000 |
| commit | c58b498f7060665e286b1b7eb978cebeed9e8655 (patch) | |
| tree | 24a6e00ca314ca57c157c9684c2e582607ed1251 /GroLUG/script/grolug_email.pl | |
| parent | r1314@narval: dakkar | 2006-02-10 19:50:50 +0100 (diff) | |
| download | IscrittiGroLUG-c58b498f7060665e286b1b7eb978cebeed9e8655.tar.gz IscrittiGroLUG-c58b498f7060665e286b1b7eb978cebeed9e8655.tar.bz2 IscrittiGroLUG-c58b498f7060665e286b1b7eb978cebeed9e8655.zip | |
merge dalla branch
git-svn-id: svn://luxion/repos/IscrittiGroLUG/trunk@191 fcb26f47-9200-0410-b104-b98ab5b095f3
Diffstat (limited to 'GroLUG/script/grolug_email.pl')
| -rwxr-xr-x | GroLUG/script/grolug_email.pl | 14 |
1 files changed, 14 insertions, 0 deletions
diff --git a/GroLUG/script/grolug_email.pl b/GroLUG/script/grolug_email.pl new file mode 100755 index 0000000..44b5f4b --- /dev/null +++ b/GroLUG/script/grolug_email.pl @@ -0,0 +1,14 @@ +#!/usr/bin/perl + +BEGIN { + $ENV{CATALYST_ENGINE} ||= 'Null'; + $ENV{CATALYST_SCRIPT_GEN} = 27; +} +use strict; +use FindBin; +use lib "$FindBin::Bin/../lib"; +use GroLUG; + +my $c=GroLUG->prepare(); +$c->{stats}=(GroLUG->debug) ? Tree::Simple->new() : ''; +$c->forward('/iscritto/send_email'); |