[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
AtEnd patch patch
From: |
Gary Oberbrunner |
Subject: |
AtEnd patch patch |
Date: |
Wed, 25 Jul 2001 16:01:51 -0400 |
Sorry, my AtEnd had a little bug. If you had more than one AtEnd, it would
run some of them twice. Here's a new version of AtEnd, just replace the old
one with it.
sub AtEnd {
my($script) = $priv::self->{script}; # this has the pkgvars
push (@{$script->{at_end_commands}}, @_);
push (@::scripts_with_at_end_commands, $script)
unless grep $script->path,
map {$_->path} @::scripts_with_at_end_commands;
}
. . . . . . . . . . . . . . . . . . . . . . . . .
Gary Oberbrunner address@hidden
GenArts, Inc. Tel: 617-492-2888
8 Clinton Street Fax: 617-492-2852
Cambridge, MA 02139 USA http://web.genarts.com
[Prev in Thread] |
Current Thread |
[Next in Thread] |
- AtEnd patch patch,
Gary Oberbrunner <=