$OpenBSD: patch-libraries_Cabal_Cabal_Distribution_Simple_Setup_hs,v 1.2 2013/07/18 21:43:24 kili Exp $
--- libraries/Cabal/Cabal/Distribution/Simple/Setup.hs.orig	Thu Apr 18 23:32:04 2013
+++ libraries/Cabal/Cabal/Distribution/Simple/Setup.hs	Sun Jul  7 16:00:36 2013
@@ -850,6 +850,7 @@ data RegisterFlags = RegisterFlags {
     regGenPkgConf  :: Flag (Maybe FilePath),
     regInPlace     :: Flag Bool,
     regDistPref    :: Flag FilePath,
+    regPkgPath     :: Flag String,
     regVerbosity   :: Flag Verbosity
   }
   deriving Show
@@ -861,6 +862,7 @@ defaultRegisterFlags = RegisterFlags {
     regGenPkgConf  = NoFlag,
     regInPlace     = Flag False,
     regDistPref    = Flag defaultDistPref,
+    regPkgPath     = Flag "",
     regVerbosity   = Flag normal
   }
 
@@ -897,6 +899,11 @@ registerCommand = makeCommand name shortDesc longDesc 
          "instead of registering, generate a package registration file"
          regGenPkgConf (\v flags -> flags { regGenPkgConf  = v })
          (optArg' "PKG" Flag flagToList)
+
+      ,option "" ["pkgpath"]
+	 "set the pkgpath field"
+	 regPkgPath (\v flags -> flags { regPkgPath = v })
+	 (reqArgFlag "PKGPATH")
       ]
 
 unregisterCommand :: CommandUI RegisterFlags
@@ -934,6 +941,7 @@ instance Monoid RegisterFlags where
     regGenPkgConf  = mempty,
     regInPlace     = mempty,
     regDistPref    = mempty,
+    regPkgPath     = mempty,
     regVerbosity   = mempty
   }
   mappend a b = RegisterFlags {
@@ -942,6 +950,7 @@ instance Monoid RegisterFlags where
     regGenPkgConf  = combine regGenPkgConf,
     regInPlace     = combine regInPlace,
     regDistPref    = combine regDistPref,
+    regPkgPath     = combine regPkgPath,
     regVerbosity   = combine regVerbosity
   }
     where combine field = field a `mappend` field b
