From 15129cd72115d52be87399f2f574764eddeac169 Mon Sep 17 00:00:00 2001
From: pmichaud <pmichaud@pobox.com>
Date: Thu, 26 Jul 2012 12:00:36 -0500
Subject: Avoid "use of uninitialized ..." warnings during module-install.

---
 skel/tools/build/module-install.pl | 1 +
 1 file changed, 1 insertion(+)

(limited to 'skel/tools/build/module-install.pl')

diff --git a/skel/tools/build/module-install.pl b/skel/tools/build/module-install.pl
index 8cbc20b..8d69c78 100644
--- a/skel/tools/build/module-install.pl
+++ b/skel/tools/build/module-install.pl
@@ -103,6 +103,7 @@ sub dfs_visit {
     my $order = shift;
     $color_of->{$module} = 'visited';
     for my $used (@{$dependencies->{$module}}) {
+        $color_of->{$used} ||= '';
         if ($color_of->{$used} eq 'not yet visited') {
             dfs_visit($used, $color_of, $dependencies, $order);
         }
-- 
cgit v1.1