From 2bc5c58d85990e483af8fde57ed5f2442351b69c Mon Sep 17 00:00:00 2001
From: tv <tv@shackspace.de>
Date: Sat, 11 Jul 2015 19:44:12 +0200
Subject: move old stuff

---
 old/lib/modules.nix | 21 +++++++++++++++++++++
 1 file changed, 21 insertions(+)
 create mode 100644 old/lib/modules.nix

(limited to 'old/lib/modules.nix')

diff --git a/old/lib/modules.nix b/old/lib/modules.nix
new file mode 100644
index 00000000..248e638e
--- /dev/null
+++ b/old/lib/modules.nix
@@ -0,0 +1,21 @@
+let
+  pkgs = import <nixpkgs> {};
+  inherit (pkgs.lib) concatMap hasAttr;
+in rec {
+
+  no-touch-args = {
+    config = throw "no-touch-args: can't touch config!";
+    lib = throw "no-touch-args: can't touch lib!";
+    pkgs = throw "no-touch-args: can't touch pkgs!";
+  };
+
+  # list-imports : path -> [path]
+  # Return a module's transitive list of imports.
+  # XXX duplicates won't get eliminated from the result.
+  list-imports = path:
+    let module = import path no-touch-args;
+        imports = if hasAttr "imports" module
+                    then concatMap list-imports module.imports
+                    else [];
+    in [path] ++ imports;
+}
-- 
cgit v1.2.3