Fix for dependent specs in view

lib/spack/spack/environment/environment.py

@@ -792,7 +792,13 @@ def regenerate(self, concrete_roots: List[Spec]) -> None:
         # Create a new view
         try:
             fs.mkdirp(new_root)
-            view.add_specs(*specs)
+
+            if self.link == "all" or self.link == "run":
+                withdeps = True
+            else:
+                withdeps = False
+
+            view.add_specs(*specs, with_dependencies=withdeps, exclude=self.exclude)
 
             # create symlink from tmp_symlink_name to new_root
             if os.path.exists(tmp_symlink_name):

lib/spack/spack/filesystem_view.py

@@ -655,12 +655,20 @@ def _sanity_check_view_projection(self, specs):
                 raise ConflictingSpecsError(current_spec, conflicting_spec)
             seen[metadata_dir] = current_spec
 
-    def add_specs(self, *specs: spack.spec.Spec) -> None:
+    def add_specs(self, *specs: spack.spec.Spec, **kwargs) -> None:
         """Link a root-to-leaf topologically ordered list of specs into the view."""
         assert all((s.concrete for s in specs))
         if len(specs) == 0:
             return
 
+        specs = set(specs)
+
+        if kwargs.get("with_dependencies", True):
+            specs.update(get_dependencies(specs))
+
+        if kwargs.get("exclude", None):
+            specs = set(filter_exclude(specs, kwargs["exclude"]))
+
         # Drop externals
         specs = [s for s in specs if not s.external]