From 4a0378429439a9d5bd69816f0e4f2277da373d0f Mon Sep 17 00:00:00 2001
From: Ian Lynagh <igloo@earth.li>
Date: Tue, 8 Nov 2011 17:59:48 +0000
Subject: [PATCH] trust packages when they're installed
For 7.2 we ignore the trust value in the package info we get given,
and always trust packages
---
utils/ghc-pkg/Main.hs | 5 ++++-
1 file changed, 4 insertions(+), 1 deletion(-)
diff --git a/utils/ghc-pkg/Main.hs b/utils/ghc-pkg/Main.hs
index 14664a8adabb..f126ef556685 100644
--- a/utils/ghc-pkg/Main.hs
+++ b/utils/ghc-pkg/Main.hs
@@ -801,7 +801,10 @@ registerPackage input verbosity my_flags auto_ghci_libs expand_env_vars update f
| p <- packages db_to_operate_on,
sourcePackageId p == sourcePackageId pkg ]
--
- changeDB verbosity (removes ++ [AddPackage pkg]) db_to_operate_on
+ -- In 7.2, we always trust packages when they're installed
+ let pkg' = pkg { trusted = True }
+
+ changeDB verbosity (removes ++ [AddPackage pkg']) db_to_operate_on
parsePackageInfo
:: String
--
GitLab