Fix test failures by adding dry_run parameter to pipeline calls

Updated three execute-tool methods in tool.clj and two test methods in
pipeline_test.clj to pass the new dry_run parameter (as nil) to
edit-form-pipeline, which now requires 7 arguments instead of 6.

All 365 tests now pass.

🤖 Generated with [Claude Code](https://claude.com/claude-code)

Co-Authored-By: Claude <noreply@anthropic.com>

Author: Bruce Hauman

src/clojure_mcp/tools/form_edit/tool.clj

@@ -164,7 +164,7 @@ Note: For `defmethod` forms, be sure to include the dispatch value (`area :recta
 
 (defmethod tool-system/execute-tool :clojure-edit-replace-form [{:keys [nrepl-client-atom] :as tool} inputs]
   (let [{:keys [file_path form_name form_type content]} inputs
-        result (pipeline/edit-form-pipeline file_path form_name form_type content :replace tool)
+        result (pipeline/edit-form-pipeline file_path form_name form_type content :replace nil tool)
         formatted-result (pipeline/format-result result)]
     formatted-result))
 
@@ -256,7 +256,7 @@ Note: For `defmethod` forms, be sure to include the dispatch value (`area :recta
 
 (defmethod tool-system/execute-tool :clojure-edit-insert-before-form [{:keys [nrepl-client-atom] :as tool} inputs]
   (let [{:keys [file_path form_name form_type content]} inputs
-        result (pipeline/edit-form-pipeline file_path form_name form_type content :before tool)
+        result (pipeline/edit-form-pipeline file_path form_name form_type content :before nil tool)
         formatted-result (pipeline/format-result result)]
     formatted-result))
 
@@ -348,7 +348,7 @@ Note: For `defmethod` forms, be sure to include the dispatch value (`area :recta
 
 (defmethod tool-system/execute-tool :clojure-edit-insert-after-form [{:keys [nrepl-client-atom] :as tool} inputs]
   (let [{:keys [file_path form_name form_type content]} inputs
-        result (pipeline/edit-form-pipeline file_path form_name form_type content :after tool)
+        result (pipeline/edit-form-pipeline file_path form_name form_type content :after nil tool)
         formatted-result (pipeline/format-result result)]
     formatted-result))
 

test/clojure_mcp/tools/form_edit/pipeline_test.clj

@@ -294,6 +294,7 @@
                            "defn"
                            "(defn example-fn [x y]\n  (* x y))"
                            :replace
+                           nil
                            *nrepl-client-atom*)
           result (sut/format-result pipeline-result)
           file-content (slurp file-path)]
@@ -316,6 +317,7 @@
                            "comment"
                            "(comment some test comment)"
                            :replace
+                           nil
                            *nrepl-client-atom*)]
       (is (true? (::sut/error pipeline-result)))
       (is (string? (::sut/message pipeline-result)))