#! /usr/bin/perl
#/*@@
#  @file      BuildActiveThorns.pl
#  @date      Tue Jan 19 14:02:07 1999
#  @author    Tom Goodale
#  @desc 
#  Creates an ActiveThornsList
#  @enddesc 
#  @version $Id$
#@@*/

require "lib/sbin/MakeUtils.pl";

$package_dir = shift(@ARGV);

&buildthorns($package_dir,"thorns");