From 114eb47a4bd48db62b2c5848397d7c6df8d274be Mon Sep 17 00:00:00 2001
From: Ben Roberts <ben@sihnon.net>
Date: Sun, 27 Mar 2016 17:05:44 +0100
Subject: [PATCH] Don't reinstall already installed atoms

Fixes Sabayon/community-buildspec#5
---
 builder | 7 +++++++
 1 file changed, 7 insertions(+)

diff --git a/builder b/builder
index 0b89cf9..8a02164 100755
--- a/builder
+++ b/builder
@@ -241,6 +241,13 @@ if ($use_equo) {
     my @Installed_Packages = qx/equo q list installed --quiet/;
     my @Available_Packages = available_packages();
     chomp(@Installed_Packages);
+
+    my %installed_packs =
+      map { $_ => 1 } @Installed_Packages;
+
+    # Remove any already installed packages from the list of entropy packages to install in the build spec
+    @equo_install = grep { ! exists $installed_packs{$_} } @equo_install;
+
     foreach my $p (@packages) {
       say "[$p] Getting the package dependencies which aren't already installed on the system.. ";
         push( @packages_deps, calculate_missing( $p , $dep_scan_depth,\@Installed_Packages,\@Available_Packages) )