From a6b1db71cd5b4e7744108e8f841fccab285939f2 Mon Sep 17 00:00:00 2001
From: "John J. Camilleri" <john@digitalgrammars.com>
Date: Wed, 4 Jul 2018 14:21:44 +0200
Subject: [PATCH 1/2] Remove more remnants from the darcs days

---
 Setup.hs | 17 ++---------------
 1 file changed, 2 insertions(+), 15 deletions(-)

diff --git a/Setup.hs b/Setup.hs
index 9749d27fe..70c2d618f 100644
--- a/Setup.hs
+++ b/Setup.hs
@@ -5,14 +5,12 @@ import Distribution.Simple.Utils
 import Distribution.Simple.Setup
 import Distribution.PackageDescription hiding (Flag)
 import Control.Monad
-import Data.Char(isSpace)
-import Data.List(isPrefixOf,intersect,unfoldr,stripPrefix)
-import Data.Maybe(listToMaybe)
+import Data.List(isPrefixOf,intersect)
 --import System.IO
 import qualified Control.Exception as E
 import System.Process(readProcess)
 import System.FilePath
-import System.Directory(createDirectoryIfMissing,copyFile,doesDirectoryExist,getDirectoryContents)
+import System.Directory(createDirectoryIfMissing,copyFile,getDirectoryContents)
 --import System.Exit
 --import Control.Concurrent(forkIO)
 --import Control.Concurrent.Chan(newChan,writeChan,readChan)
@@ -399,14 +397,3 @@ parallel_ ms = sequence_ ms {-
      ts <- sequence [ forkIO (m >> writeChan c ()) | m <- ms]
      sequence_ [readChan c | _ <- ts]
 --}
-
-patches = paras . lines
-  where
-    paras = unfoldr para
-    para ls = case break null $ dropWhile null ls of
-                ([],[]) -> Nothing
-                (xs,ys) -> Just (info xs,ys)
-
-    info = unwords . map dropHeaders . filter (\l->not $ any (`isPrefixOf` l) [" ","patch "])
-    dropHeaders = dropWhile isSpace . dropPrefix "Author: " . dropPrefix "Date: "
-    dropPrefix pre l = maybe l id (stripPrefix pre l)

From af82dc9fc6c1547ab899df7ba211606ad12dbbad Mon Sep 17 00:00:00 2001
From: "John J. Camilleri" <john@digitalgrammars.com>
Date: Wed, 4 Jul 2018 14:28:25 +0200
Subject: [PATCH 2/2] Fix `make sdist` to use `git archive` instead of `darcs
 dist`

---
 Makefile | 13 ++++++-------
 1 file changed, 6 insertions(+), 7 deletions(-)

diff --git a/Makefile b/Makefile
index 6fa4f21c1..78febb495 100644
--- a/Makefile
+++ b/Makefile
@@ -21,9 +21,6 @@ doc:
 clean:
 	cabal clean
 
-#sdist:
-#	cabal sdist
-
 gf:
 	cabal build rgl-none
 	strip dist/build/gf/gf
@@ -45,9 +42,11 @@ pkg:
 bintar:
 	bash bin/build-binary-dist.sh
 
-# Make a source tar.gz distribution using darcs to make sure that everything
-# is included. We put the distribution in dist/ so it is removed on
-# `make clean`
+#sdist:
+#	cabal sdist
+
+# Make a source tar.gz distribution using git to make sure that everything is included.
+# We put the distribution in dist/ so it is removed on `make clean`
 sdist:
 	test -d dist || mkdir dist
-	darcs dist -d dist/gf-${VERSION}
+	git archive --format=tar.gz --output=dist/gf-${VERSION}.tar.gz HEAD