[Midnightbsd-cvs] mports: lib/Mport: Typo fixes.

ctriv at midnightbsd.org ctriv at midnightbsd.org
Sat Oct 20 18:33:43 EDT 2007


Log Message:
-----------
Typo fixes.

Modified Files:
--------------
    mports/Tools/lib/Mport:
        Depend.pm (r1.1 -> r1.2)
        Index.pm (r1.3 -> r1.4)

-------------- next part --------------
Index: Index.pm
===================================================================
RCS file: /home/cvs/mports/Tools/lib/Mport/Index.pm,v
retrieving revision 1.3
retrieving revision 1.4
diff -LTools/lib/Mport/Index.pm -LTools/lib/Mport/Index.pm -u -r1.3 -r1.4
--- Tools/lib/Mport/Index.pm
+++ Tools/lib/Mport/Index.pm
@@ -41,13 +41,8 @@
       $sth->execute(@port{qw(name version description pkgname license)});
       $sth->finish;
   
-      $sth = $dbh->prepare("INSERT INTO depends (port, type, dependency) VALUES (?,?,?)");
-      while (my ($type, $deps) = each %{$port{'depends'}}) {
-        foreach my $dep (@$deps) {
-          $sth->execute($port{'name'}, $type, $dep);
-        }
-      }
-      $sth->finish;
+      $class->insert_depends(\%port, $dbh);
+  
       
       $sth = $dbh->prepare("INSERT INTO port_categories (port, category_id) VALUES (?, (SELECT id FROM categories WHERE category=?))");      
       foreach my $cat (@{$port{'categories'}}) {      
@@ -65,6 +60,20 @@
   };
 }
 
+
+sub insert_depends {
+  my ($class, $port, $dbh) = @_;
+  
+  my $sth = $dbh->prepare("INSERT INTO depends (port, type, dependency) VALUES (?,?,?)");
+  while (my ($type, $deps) = each %{$port->{'depends'}}) {
+    foreach my $dep (@$deps) {
+      $sth->execute($port->{'name'}, $type, $dep);
+      }
+  }
+  $sth->finish;
+}
+
+
 sub insert_categories {
   my ($dbh) = @_;
   
Index: Depend.pm
===================================================================
RCS file: /home/cvs/mports/Tools/lib/Mport/Depend.pm,v
retrieving revision 1.1
retrieving revision 1.2
diff -LTools/lib/Mport/Depend.pm -LTools/lib/Mport/Depend.pm -u -r1.1 -r1.2
--- Tools/lib/Mport/Depend.pm
+++ Tools/lib/Mport/Depend.pm
@@ -9,9 +9,9 @@
 
 
 __PACKAGE__->table('depends');
-__PACKAGE__->columns(All => qw(port type dependancy));
+__PACKAGE__->columns(All => qw(port type dependency));
 __PACKAGE__->has_a(port => 'Mport::Port');
-__PACKAGE__->has_a(dependancy => 'Mport::Port');
+__PACKAGE__->has_a(dependency => 'Mport::Port');
 
 
 1;


More information about the Midnightbsd-cvs mailing list