my $demo_dir = File::Spec->catdir($self->blib, 'demo');
File::Path::mkpath( $script_dir );
File::Path::mkpath( $demo_dir );
+ $self->add_to_cleanup($demo_dir);
foreach my $file (keys %$files) {
my $dest_dir = $file =~ /_demo$/ ? $demo_dir : $script_dir ;
my $conf_dir = File::Spec->catdir($self->blib, 'conf');
File::Path::mkpath( $conf_dir );
+
foreach my $file (keys %$files) {
my $result = $self->copy_if_modified($file, $conf_dir, 'flatten') or next;
$self->fix_shebang_line($result) if $self->is_unixish();
People besides Uri who've contributed to Stem code and docs:
Dave Rolsky - various code, bug fixes, docs, etc.
+Stephen R. Scaffidi - various bug fixes, docs, etc.
^blib/
^MakeMaker-\d
+# demo files so we don't need to install
+^demo/
+
# Temp, old and emacs backup files.
~$
\.old$
use File::Basename qw( basename );
$ENV{PATH} .= ':' . basename( $0 ) . ':.';
+
for my $prog qw( run_stem xterm telnet ) {
die "Can't find $prog in PATH\n" if
system( "which $prog >/dev/null 2>&1" ) != 0;
eval { use lib 'blib/lib' } if -d 'blib/lib';
+eval { use lib '../blib/lib' } if -d '../blib/lib';
$Data::Dumper::Indent = 1 ;
$Data::Dumper::Purity = 1 ;