sbt taskAll command

taskAll.sbt

commands += Command.args("taskAll", """<task name> <project id regex>""") { (s, args) =>
  val taskName = args.head
  val projectRegexList = args.tail
  val extracted = Project.extract(s)
  val currentBuildUri = extracted.currentRef.build
  val buildStructure = extracted.structure
  val buildUnitsMap = buildStructure.units
  val currentBuildUnit = buildUnitsMap(currentBuildUri)
  val projectsMap = currentBuildUnit.defined
  val projects = projectsMap.values.map(_.id).toVector.filter(id => projectRegexList.exists(id matches _))
  val result = projects.map(_ + "/" + taskName).mkString("all ", " ", "")
  s.log.info(result)
  result :: s
}