minor: std

nib/std/attrs.nix

@@ -93,16 +93,17 @@ in rec {
 
   mapAttrsRecursive = f: set: mapAttrsRecursiveCond (as: true) f set;
 
-  # form: attrValueAt :: xs -> path -> value
+  # form: attrValueAt :: list string -> set -> Maybe Any
   # given path as a list of strings, return that value of an
   # attribute set at that path
-  attrValueAt = let
+  attrValueAt = path: xs:
-    value = foldl (l: r:
+    foldl (left: right:
-      if builtins.isAttrs l && builtins.hasAttr r l
+      if builtins.isAttrs left && builtins.hasAttr right left
-      then l.${r}
+      then left.${right}
-      else null);
+      else null)
-  in
+    xs
-    nullableToMaybe value;
+    path
+    |> nullableToMaybe;
 
   mergeAttrsList = list: let
     # `binaryMerge start end` merges the elements at indices `index` of `list` such that `start <= index < end`

nib/std/lists.nix

@@ -51,4 +51,6 @@
     if index == null
     then default
     else builtins.elemAt list index;
+
+  zipLists = zipListsWith (fst: snd: {inherit fst snd;});
 }