Rename dry-run parameter to dry_run for consistency

- Change parameter name from dry-run to dry_run (with underscore)
- Update all references in file_edit and form_edit tools
- Fix key mismatch in validate-inputs return map

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

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

Author: Bruce Hauman

src/clojure_mcp/tools/file_edit/pipeline.clj

@@ -124,11 +124,11 @@
    
    Returns:
    - A context map with the result of the operation"
-  [file-path old-string new-string dry-run {:keys [nrepl-client-atom] :as config}]
+  [file-path old-string new-string dry_run {:keys [nrepl-client-atom] :as config}]
   (let [initial-ctx {::form-pipeline/file-path file-path
                      ::old-string old-string
                      ::new-string new-string
-                     ::dry-run dry-run
+                     ::dry-run dry_run
                      ::form-pipeline/nrepl-client-atom nrepl-client-atom
                      ::form-pipeline/config config}]
     ;; Pipeline for existing file edit
@@ -172,19 +172,19 @@
   (if (::form-pipeline/error ctx)
     {:error true
      :message (::form-pipeline/message ctx)}
-    (let [dry-run (::dry-run ctx)]
+    (let [dry_run (::dry-run ctx)]
       (cond-> {:error false
                :type (::form-pipeline/type ctx)}
         ;; Include repaired flag if present
         (::form-pipeline/repaired ctx)
         (assoc :repaired true)
 
         ;; Return new-source if dry-run is "new-source"
-        (= dry-run "new-source")
+        (= dry_run "new-source")
         (assoc :new-source (::form-pipeline/output-source ctx))
 
         ;; Otherwise return diff (default behavior and for "diff" dry-run)
-        (not= dry-run "new-source")
+        (not= dry_run "new-source")
         (assoc :diff (::form-pipeline/diff ctx))))))
 
 (comment

src/clojure_mcp/tools/file_edit/tool.clj

@@ -81,8 +81,8 @@ To make a file edit, provide the file_path, old_string (the text to replace), an
              :new_string new_string))))
 
 (defmethod tool-system/execute-tool :file-edit [{:keys [nrepl-client-atom] :as tool} inputs]
-  (let [{:keys [file_path old_string new_string dry-run]} inputs
-        result (pipeline/file-edit-pipeline file_path old_string new_string dry-run tool)]
+  (let [{:keys [file_path old_string new_string dry_run]} inputs
+        result (pipeline/file-edit-pipeline file_path old_string new_string dry_run tool)]
     (pipeline/format-result result)))
 
 (defmethod tool-system/format-results :file-edit [_ {:keys [error message diff new-source type repaired]}]

src/clojure_mcp/tools/form_edit/combined_edit_tool.clj

@@ -126,7 +126,7 @@ Note: For `defmethod` forms, be sure to include the dispatch value (`area :recta
 ;; Validate inputs implementation
 (defmethod tool-system/validate-inputs :clojure-edit-form [{:keys [nrepl-client-atom]} inputs]
   (let [file-path (validate-file-path inputs nrepl-client-atom)
-        {:keys [form_identifier form_type operation content dry-run]} inputs
+        {:keys [form_identifier form_type operation content dry_run]} inputs
         form_name form_identifier]
     (when-not form_identifier
       (throw (ex-info "Missing required parameter: form_identifier"
@@ -149,16 +149,16 @@ Note: For `defmethod` forms, be sure to include the dispatch value (`area :recta
      :form_type form_type
      :operation operation
      :content content
-     :dry-run dry-run}))
+     :dry_run dry_run}))
 
 ;; Execute tool implementation
 (defmethod tool-system/execute-tool :clojure-edit-form [{:keys [nrepl-client-atom] :as tool} inputs]
-  (let [{:keys [file_path form_name form_type operation content dry-run]} inputs
+  (let [{:keys [file_path form_name form_type operation content dry_run]} inputs
         edit-type (case operation
                     "replace" :replace
                     "insert_before" :before
                     "insert_after" :after)
-        result (pipeline/edit-form-pipeline file_path form_name form_type content edit-type dry-run tool)
+        result (pipeline/edit-form-pipeline file_path form_name form_type content edit-type dry_run tool)
         formatted-result (pipeline/format-result result)]
     formatted-result))
 

src/clojure_mcp/tools/form_edit/pipeline.clj

@@ -542,21 +542,21 @@
   (if (::error ctx)
     {:error true
      :message (::message ctx)}
-    (let [dry-run (::dry-run ctx)
+    (let [dry_run (::dry-run ctx)
           result-map {:error false}]
       (cond-> result-map
         (::offsets ctx) (assoc :offsets (::offsets ctx))
 
         ;; Return new-source if dry-run is "new-source"
-        (= dry-run "new-source")
+        (= dry_run "new-source")
         (assoc :new-source (::output-source ctx))
 
         ;; Otherwise return diff (default behavior and for "diff" dry-run)
-        (and (::diff ctx) (not= dry-run "new-source"))
+        (and (::diff ctx) (not= dry_run "new-source"))
         (assoc :diff (::diff ctx))
 
         ;; Legacy: include :result if output-source exists
-        (and (::output-source ctx) (not dry-run))
+        (and (::output-source ctx) (not dry_run))
         (assoc :result [(::output-source ctx)])))))
 
 ;; Pipeline function definitions
@@ -574,13 +574,13 @@
    - config: Optional tool configuration map with :nrepl-client-atom
    
    Returns a context map with the result of the operation"
-  [file-path form-name form-type content-str edit-type dry-run {:keys [nrepl-client-atom] :as config}]
+  [file-path form-name form-type content-str edit-type dry_run {:keys [nrepl-client-atom] :as config}]
   (let [ctx {::file-path file-path
              ::top-level-def-name form-name
              ::top-level-def-type form-type
              ::new-source-code content-str
              ::edit-type edit-type
-             ::dry-run dry-run
+             ::dry-run dry_run
              ::nrepl-client-atom nrepl-client-atom
              ::config config}]
     (thread-ctx