From d11f00053e821dcbe8830541bf112ae5cb278100 Mon Sep 17 00:00:00 2001
From: simonmar <unknown>
Date: Mon, 3 Jun 2002 10:27:11 +0000
Subject: [PATCH] [project @ 2002-06-03 10:27:11 by simonmar] Fix buglet with
 --force, spotted by George Russell

---
 ghc/utils/ghc-pkg/Main.hs |    3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/ghc/utils/ghc-pkg/Main.hs b/ghc/utils/ghc-pkg/Main.hs
index b875ce3..4583110 100644
--- a/ghc/utils/ghc-pkg/Main.hs
+++ b/ghc/utils/ghc-pkg/Main.hs
@@ -1,5 +1,5 @@
 -----------------------------------------------------------------------------
--- $Id: Main.hs,v 1.23 2002/05/29 22:11:58 sof Exp $
+-- $Id: Main.hs,v 1.24 2002/06/03 10:27:11 simonmar Exp $
 --
 -- Package management tool
 -----------------------------------------------------------------------------
@@ -48,6 +48,7 @@ isAction (Config _)     = False
 isAction (Field _)      = False
 isAction (Input _)      = False
 isAction (AutoGHCiLibs) = False
+isAction (Force)	= False
 isAction _              = True
 
 usageHeader = "ghc-pkg [OPTION...]"
-- 
1.7.10.4