[Midnightbsd-cvs] mports [18883] trunk/Tools/lib/Magus/Index.pm: hash

[laffer1 at midnightbsd.org]

Revision: 18883
          http://svnweb.midnightbsd.org/mports/?rev=18883
Author:   laffer1
Date:     2015-05-09 10:53:41 -0400 (Sat, 09 May 2015)
Log Message:
-----------
hash

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

Modified: trunk/Tools/lib/Magus/Index.pm
===================================================================
--- trunk/Tools/lib/Magus/Index.pm	2015-05-09 14:51:27 UTC (rev 18882)
+++ trunk/Tools/lib/Magus/Index.pm	2015-05-09 14:53:41 UTC (rev 18883)
@@ -96,17 +96,17 @@
     my $port = Magus::Port->retrieve($id) || die "Got an invalid port in the depends list! ($id)";
 
     for (@$depends) {
-      my $depend = Magus::Port->retrieve(run => $run, name => $_->{name});
+      my $depend = Magus::Port->retrieve(run => $run, name => $_{name});
       
       if (!$depend) {
-        warn "\tMissing depend for $port: $_->{name}\n";
-        $port->set_result_fail(qq(depend "$_->{name}" does not exist.));
+        warn "\tMissing depend for $port: $_{name}\n";
+        $port->set_result_fail(qq(depend "$_{name}" does not exist.));
         next PORT;
       }
       
       $port->add_to_depends({ 
         dependency => $depend,
-	type => $_->{type}
+	type => $_{type}
       });    
     }    
   }