Fix: help without -p runs the default pipeline instead of printing help

Fun.Build.Tests/PipelineBuilderTests.fs

@@ -572,3 +572,46 @@ let ``check GetAllCmdArgs and RemainingArgs works when remaining args is not pro
 
     Assert.Equal<string list>([ "-p"; "demo"; "test1"; "v1" ], actualAllCmdArgs)
     Assert.Equal<string list>([], actualRemainingArgs)
+
+[<Fact>]
+let ``help without -p should not run default pipeline`` () =
+    let mutable called = false
+
+    pipeline "Build" {
+        cmdArgs [ "--help" ]
+        stage "build" { run (fun _ -> called <- true) }
+        runIfOnlySpecified false
+    }
+
+    Assert.False(called)
+
+[<Fact>]
+let ``help with -p should not run pipeline`` () =
+    let mutable called = false
+
+    pipeline "Build" {
+        cmdArgs [ "-p"; "Build"; "--help" ]
+        stage "build" { run (fun _ -> called <- true) }
+        runIfOnlySpecified
+    }
+
+    Assert.False(called)
+
+[<Fact>]
+let ``help without -p should not run any pipeline when multiple exist`` () =
+    let mutable buildCalled = false
+    let mutable otherCalled = false
+
+    pipeline "Build" {
+        cmdArgs [ "--help" ]
+        stage "build" { run (fun _ -> buildCalled <- true) }
+        runIfOnlySpecified false
+    }
+    pipeline "Other" {
+        cmdArgs [ "--help" ]
+        stage "other" { run (fun _ -> otherCalled <- true) }
+        runIfOnlySpecified true
+    }
+
+    Assert.False(buildCalled)
+    Assert.False(otherCalled)

Fun.Build/CHANGELOG.md

@@ -2,6 +2,11 @@
 
 ## [Unreleased]
 
+## [1.1.18] - 2026-08-31
+
+- Fix: help without -p runs the default pipeline instead of printing help
+ #91
+
 ## [1.1.17] - 2025-09-23
 
 Support run multiple pipelines in one execution

Fun.Build/PipelineBuilder.fs

@@ -267,7 +267,7 @@ type PipelineBuilder(name: string) =
 
         try
             match pipelineIndexes with
-            | [] when not specified -> ctx.Run()
+            | [] when not specified && not isHelp -> ctx.Run()
             | [] -> ()
             | _ :: _ ->
                 for i, index in Seq.indexed pipelineIndexes do

demo-cmd.fsx

@@ -12,10 +12,11 @@ module Apps =
 
     let all = [ app1; app2; app3 ]
 
-let args =
-    {| app = fun apps -> CmdArg.Create(shortName = "-a", longName = "--app", values = apps, description = "specify the app you want to dev")
-       path = CmdArg.Create("-f", "--file", "publish directory for the app")
-       watch = CmdArg.Create(shortName = "-w", description = "if is in watch mode") |}
+let args = {|
+    app = fun apps -> CmdArg.Create(shortName = "-a", longName = "--app", values = apps, description = "specify the app you want to dev")
+    path = CmdArg.Create("-f", "--file", "publish directory for the app")
+    watch = CmdArg.Create(shortName = "-w", description = "if is in watch mode")
+|}
 
 
 pipeline "demo" {