Experiment 2

src/Nixfmt/Pretty.hs

@@ -382,6 +382,7 @@ isAbstractionWithAbsorbableTerm _ = False
 isAbsorbable :: Term -> Bool
 isAbsorbable (String (Ann _ parts@(_:_:_) _))
     = not $ isSimpleString parts
+isAbsorbable (Path _) = True
 -- Non-empty sets and lists
 isAbsorbable (Set _ _ (Items (_:_)) _)                                   = True
 isAbsorbable (List _ (Items (_:_)) _)                                    = True
@@ -399,7 +400,7 @@ absorbRHS expr = case expr of
         hardspace <> pretty open
         <> (surroundWith line' . group . nest 2 . base) expr'
         <> pretty close
-    -- Not all strings are absorbably, but in this case we always want to keep them attached.
+    -- Not all strings are absorbable, but in this case we always want to keep them attached.
     -- Because there's nothing to gain from having them start on a new line.
     (Term (String _)) -> hardspace <> group expr
     -- Same for path