From 3a9d5d878c4aa9af384c3a609960dd9bd9bef145 Mon Sep 17 00:00:00 2001
From: John MacFarlane <jgm@berkeley.edu>
Date: Thu, 28 May 2015 09:59:08 -0700
Subject: make-reference-files:  use proper path separators for Windows.

Fixes a bug with reference.docx and reference.odt in Windows
builds.
---
 data/make-reference-files.hs | 5 +++--
 1 file changed, 3 insertions(+), 2 deletions(-)

diff --git a/data/make-reference-files.hs b/data/make-reference-files.hs
index 2e64dc51f..77e518496 100644
--- a/data/make-reference-files.hs
+++ b/data/make-reference-files.hs
@@ -4,11 +4,12 @@ import Codec.Archive.Zip
 import qualified Data.ByteString.Lazy as BS
 import qualified Control.Exception as E
 import System.IO.Error (isDoesNotExistError)
+import System.FilePath
 
 mkzip :: String -> IO ()
 mkzip fmt = do
-  let dir    = "data/"++fmt
-      output = "data/reference."++fmt
+  let dir    = "data" </> fmt
+      output = "data" </> "reference" <.> fmt
   cd <- getCurrentDirectory
   setCurrentDirectory dir
   archive <- addFilesToArchive [OptRecursive] emptyArchive ["."]
-- 
cgit v1.2.3