#------------------------------------------------------------
# Copyright (C) 2006 RoyaltyShare, Inc.   All Rights Reserved
# $Id$
#------------------------------------------------------------
package RPS::Track::TrackListWithCALicenses;

use strict;
use warnings;

use lib '/app/tools/rps/lib';
use RPS::Track::TrackListSimple;
use RPS::Track::TrackWithCALicenses;
use base 'RPS::Track::TrackListSimple';

sub _licenseType { return "CA"; }

sub _getTrackXML {
    my ( $self, $trackDBObj, %args ) = @_;
    return RPS::Track::TrackWithCALicenses->new( _dbItem => $trackDBObj, %args );
}

1;