From: simonmar <unknown>
Date: Mon, 3 Jun 2002 10:27:11 +0000 (+0000)
Subject: [project @ 2002-06-03 10:27:11 by simonmar]
X-Git-Tag: Approx_11550_changesets_converted~2000
X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=d11f00053e821dcbe8830541bf112ae5cb278100

[project @ 2002-06-03 10:27:11 by simonmar]
Fix buglet with --force, spotted by George Russell
---

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...]"