+#
+# Copyright 2002-2007 The ChatSpike Development Team
+# <brain@chatspike.net>
+# <Craig@chatspike.net>
+#
+# Licensed under GPL, please see the COPYING file
+# for more information
+#
+
package make::utilities;
use Exporter 'import';
use POSIX;
chomp($replace);
$line =~ s/exec\("(.+?)"\)/$replace/;
}
+ while ($line =~ /execruntime\("(.+?)"\)/)
+ {
+ $line =~ s/execruntime\("(.+?)"\)/`\1`/;
+ }
while ($line =~ /eval\("(.+?)"\)/)
{
print "Evaluating perl code for module \033[1;32m$module\033[0m ... ";
while ($line =~ /rpath\("(.+?)"\)/)
{
my $replace = make_rpath($1,$module);
+ $replace = "" if ($^O =~ /darwin/i);
$line =~ s/rpath\("(.+?)"\)/$replace/;
}
};