[Midnightbsd-cvs] mports [18891] trunk/Tools/lib/Magus/Port.pm: return a depends object not another port

[laffer1 at midnightbsd.org]

Revision: 18891
          http://svnweb.midnightbsd.org/mports/?rev=18891
Author:   laffer1
Date:     2015-05-09 17:26:20 -0400 (Sat, 09 May 2015)
Log Message:
-----------
return a depends object not another port

Modified Paths:
--------------
    trunk/Tools/lib/Magus/Port.pm

Modified: trunk/Tools/lib/Magus/Port.pm
===================================================================
--- trunk/Tools/lib/Magus/Port.pm	2015-05-09 21:18:16 UTC (rev 18890)
+++ trunk/Tools/lib/Magus/Port.pm	2015-05-09 21:26:20 UTC (rev 18891)
@@ -44,7 +44,7 @@
 
 __PACKAGE__->has_a(run => 'Magus::Run');
 
-__PACKAGE__->has_many(depends => [ 'Magus::Depend' => 'dependency' ] => 'port');
+__PACKAGE__->has_many(depends => [ 'Magus::Depend' => 'dependency' ]);
 __PACKAGE__->has_many(categories => [ 'Magus::PortCategory' => 'category' ]);
 __PACKAGE__->has_many(events => 'Magus::Event');
 
@@ -118,7 +118,7 @@
 sub _walk {
   my ($port, $depends) = @_;
   
-  foreach my $dep ($port->depends) {
+  foreach my $dep ($port->depends->port) {
     if (!$depends->{$dep}) {
       $depends->{$dep} = $dep;
       _walk($dep, $depends);