From 79ddffdec78b05f12243acbbe0e82dfdc238e76f Mon Sep 17 00:00:00 2001
From: Andrew Cady <d@jerkface.net>
Date: Tue, 15 Oct 2019 02:41:39 -0400
Subject: $(debarch) support

---
 fsmgr.hs | 7 ++++++-
 1 file changed, 6 insertions(+), 1 deletion(-)

diff --git a/fsmgr.hs b/fsmgr.hs
index d28c0e4..a96bc1b 100644
--- a/fsmgr.hs
+++ b/fsmgr.hs
@@ -34,7 +34,12 @@ noParent (EmptyImageOfBytes _)     = True
 noParent (ParentImageConfigFile _) = False
 
 dynamicNames :: FilePath -> FilePath
-dynamicNames = replace "$(karch)" uname
+dynamicNames = replace "$(karch)" uname . replace "$(debarch)" debarch
+
+debarch :: String
+debarch = unsafePerformIO $ do
+  Stdout out <- cmd "dpkg-architecture -q DEB_BUILD_ARCH"
+  return out
 
 uname :: String
 uname = unsafePerformIO $ do
-- 
cgit v1.2.3