From b7a8ddf20cee4d64dfe165b3061b9538bbc6bd4d Mon Sep 17 00:00:00 2001
From: Ron Fox <59235416+rfoxkendo@users.noreply.github.com>
Date: Tue, 28 Nov 2023 09:33:27 -0500
Subject: [PATCH] Update version.tcl

Add program_name field to SpecTcl version REST response.
---
 main/rest/custom/version.tcl | 1 +
 1 file changed, 1 insertion(+)

diff --git a/main/rest/custom/version.tcl b/main/rest/custom/version.tcl
index a0ae7ff5d..b0065428d 100755
--- a/main/rest/custom/version.tcl
+++ b/main/rest/custom/version.tcl
@@ -67,6 +67,7 @@ proc SpecTcl_version {} {
                 [json::write object                                       \
                     major $major  minor $minor                            \
                     editlevel [json::write string $edit]                  \
+                    program_name [json:write string SpecTcl]              \
                  ]                                                        \
            ]
 }