Fixed the initial population of the epoc32 tree with rnd bins to deal with the fact that the zips are in a slightly different location. (cf the changes made for Bug 350) Simplified the way in which the setting of sf.spec.package.src.enable is handled - no need to use it to change the zipping template, just use it to control which parts of the template we invoke.

     1

#!perl -w

     2

use strict;

     3

# Sorts the input, removes duplicates, and outputs it

     4

     5

# Read it

     6

my @content = <>;

     7

     8

# Sort it, and grep to remove duplicates

     9

my $previous = "\n\n";

    10

@content = grep {$_ ne $previous && ($previous = $_, 1) } sort @content;

    11

    12

# Write it

    13

print @content;