Remove constants; these are provided in the context.
Patch by kareila.
diffs (13 lines):
diff -r e78c7b3accaf -r e1fb01695dda S2/BackendPerl.pm
--- a/S2/BackendPerl.pm Fri Oct 08 18:21:15 2010 +0800
+++ b/S2/BackendPerl.pm Fri Oct 22 23:30:16 2010 +0800
@@ -49,9 +49,6 @@ sub output {
else {
$io->writeln("package S2;");
$io->writeln("use strict;");
- $io->writeln("use constant VTABLE => 0;");
- $io->writeln("use constant STATIC => 1;");
- $io->writeln("use constant PROPS => 2;");
$io->writeln("register_layer($this->{'layerID'});");
my $nodes = $this->{'layer'}->getNodes();
foreach my $n (@$nodes) {
_______________________________________________
dw-changelog mailing list
[email protected]
http://lists.dwscoalition.org/mailman/listinfo/dw-changelog
