Special-case format command to delegate directly to elm-format

As suggested in PR review, the format command now bypasses Lamdera's
normal CLI processing and delegates directly to elm-format's mainIO.
This ensures perfect compatibility with all elm-format features and
reduces code duplication.

Changes:
- Intercept "format" command early in Terminal.hs
- Add minimal FormatDirect module that calls elm-format
- Remove 244-line Format.hs implementation
- Keep stub command for help display consistency

Author: CharlonTank

elm.cabal

@@ -237,7 +237,7 @@ Executable lamdera
         -- CLI Experimental
         Lamdera.CLI.Annotate
         Lamdera.CLI.Interpreter
-        Lamdera.CLI.Format
+        Lamdera.CLI.FormatDirect
 
         Lamdera.AppConfig
         Lamdera.Checks

extra/Lamdera/CLI.hs

@@ -16,7 +16,6 @@ import qualified Lamdera.CLI.Reset
 import qualified Lamdera.CLI.Update
 import qualified Lamdera.CLI.Annotate
 import qualified Lamdera.CLI.Interpreter
-import qualified Lamdera.CLI.Format
 
 
 live :: Terminal.Command
@@ -195,10 +194,23 @@ eval =
 
 
 -- FORMAT
+-- @LAMDERA This is a stub - the actual format command is intercepted early in Terminal.hs
+-- and delegates directly to elm-format's CLI for perfect compatibility
 
 
 format :: Terminal.Command
-format = Lamdera.CLI.Format.command
+format =
+  let
+    summary =
+      "Format Elm source files."
+
+    details =
+      "The `format` command is handled directly by elm-format for perfect compatibility."
+
+    example =
+      reflow "See elm-format documentation at <https://github.com/avh4/elm-format>"
+  in
+  Terminal.Command "format" (Common summary) details example noArgs noFlags (\_ _ -> return ())
 
 
 -- HELPERS

extra/Lamdera/CLI/Format.hs

@@ -0,0 +1,11 @@
+module Lamdera.CLI.FormatDirect
+  ( run
+  ) where
+
+import qualified ElmFormat.Cli
+
+-- | Run elm-format directly with the provided arguments
+-- This bypasses Lamdera's normal CLI processing to delegate
+-- directly to elm-format's own argument handling
+run :: [String] -> IO ()
+run args = ElmFormat.Cli.mainIO args

extra/Lamdera/CLI/FormatDirect.hs

@@ -31,6 +31,7 @@ import qualified Terminal.Error as Error
 
 
 import qualified Lamdera.Version
+import qualified Lamdera.CLI.FormatDirect  -- @LAMDERA
 import qualified Sanity
 
 -- COMMAND
@@ -86,21 +87,26 @@ app intro outro commands =
               Exit.exitSuccess
 
         command : chunks ->
-          do  case List.find (\cmd -> toName cmd == command) commands of
-                Nothing ->
-                  Error.exitWithUnknown command (map toName commands)
+          -- @LAMDERA Special case for format command to delegate directly to elm-format
+          if command == "format" then
+            do  -- Import will be added at the top of the file
+                Lamdera.CLI.FormatDirect.run chunks
+          else
+            do  case List.find (\cmd -> toName cmd == command) commands of
+                  Nothing ->
+                    Error.exitWithUnknown command (map toName commands)
 
-                Just (Command _ _ details example args_ flags_ callback) ->
-                  if elem "--help" chunks then
-                    Error.exitWithHelp (Just command) details example args_ flags_
+                  Just (Command _ _ details example args_ flags_ callback) ->
+                    if elem "--help" chunks then
+                      Error.exitWithHelp (Just command) details example args_ flags_
 
-                  else
-                    case snd $ Chomp.chomp Nothing chunks args_ flags_ of
-                      Right (argsValue, flagsValue) ->
-                        callback argsValue flagsValue
+                    else
+                      case snd $ Chomp.chomp Nothing chunks args_ flags_ of
+                        Right (argsValue, flagsValue) ->
+                          callback argsValue flagsValue
 
-                      Left err ->
-                        Error.exitWithError err
+                        Left err ->
+                          Error.exitWithError err