From 8f06f6dc9898ea2e188e70243cb5e15548feea91 Mon Sep 17 00:00:00 2001
From: P. J. McDermott <pjm@nac.net>
Date: Tue, 16 Jul 2013 16:12:04 -0400
Subject: include: Remove old versions of packages.

---
(limited to 'lib/cmd/include.sh')

diff --git a/lib/cmd/include.sh b/lib/cmd/include.sh
index 44cedf1..9c1b8f0 100644
--- a/lib/cmd/include.sh
+++ b/lib/cmd/include.sh
@@ -58,6 +58,13 @@ cmd_include_main()
 		pool_dist_db="${archive}/${pool_dir}/.db"
 		pool_dist_db="${pool_dist_db}/${cmd_include_distribution}"
 		feeds=''
+		if [ -f "${pool_dist_db}/version" \
+				-a "x$(cat "${pool_dist_db}/version")" \
+				!= "x${cmd_include_version}" ]; then
+			# TODO: Remove ":" when cmd_remove is implemented.
+			: cmd_remove "${cmd_include_distribution}" \
+				"${cmd_include_source}"
+		fi
 		mkdir -p "${pool_dist_db}"
 		printf '%s\n' "${cmd_include_version}" \
 			>"${pool_dist_db}/version"
--
cgit v0.9.1