[no subject]

[Patrice Dumas]

branch: master
commit 93e32f4b24f0d70e3f5e80b93f008fbada02641f
Author: Patrice Dumas <pertusus@free.fr>
AuthorDate: Sun Aug 18 07:30:06 2024 +0200

    * tp/maintain/regenerate_C_options_info.pl: do not generate
    set_option_key_configured anymore, it is unused and there is a better
    version.
---
 ChangeLog                                |  6 ++++++
 tp/maintain/regenerate_C_options_info.pl | 20 --------------------
 2 files changed, 6 insertions(+), 20 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index 30cdce28b4..1d481ee5c2 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2024-08-18  Patrice Dumas  <pertusus@free.fr>
+
+       * tp/maintain/regenerate_C_options_info.pl: do not generate
+       set_option_key_configured anymore, it is unused and there is a better
+       version.
+
 2024-08-17  Patrice Dumas  <pertusus@free.fr>
 
        * tp/Texinfo/XS/main/customization_options.c
diff --git a/tp/maintain/regenerate_C_options_info.pl 
b/tp/maintain/regenerate_C_options_info.pl
index a65231dfd7..1afb02b16a 100755
--- a/tp/maintain/regenerate_C_options_info.pl
+++ b/tp/maintain/regenerate_C_options_info.pl
@@ -261,26 +261,6 @@ foreach my $category (sort(keys(%option_categories))) {
 }
 print CODE "}\n\n";
 
-# set configured based on the name
-# NOTE currently unused, as there is another function that uses a bsearch
-print CODE 'void
-set_option_key_configured (OPTIONS *options, const char *key, int configured)
-{
-  if (0) {}
-';
-foreach my $category (sort(keys(%option_categories))) {
-  print CODE "\n/* ${category} */\n\n";
-  foreach my $option_info (@{$option_categories{$category}}) {
-    my ($option, $value, $type) = @$option_info;
-    print CODE "  else if (!strcmp (key, \"$option\"))
-    {
-      if (configured > 0)
-        options->$option.configured = configured;
-    }\n";
-  }
-}
-
-print CODE "}\n\n";
 
 # associate commands to options
 print CODE "#include \"command_ids.h\"\n\n";