diff --git a/src/casefiddle.c b/src/casefiddle.c
index de2325ebf36..52dacf27028 100644
--- a/src/casefiddle.c
+++ b/src/casefiddle.c
@@ -557,10 +557,10 @@ casify_region (enum case_action flag, Lisp_Object b, Lisp_Object e)
     {
       signal_after_change (start, end - start - added, end - start);
       update_compositions (start, end, CHECK_ALL);
-#ifdef HAVE_TREE_SITTER
-      treesit_record_change (start_byte, old_end_byte, CHAR_TO_BYTE (end));
-#endif
     }
+#ifdef HAVE_TREE_SITTER
+      treesit_record_change (start_byte, old_end_byte, CHAR_TO_BYTE (orig_end + added));
+#endif
 
   return orig_end + added;
 }