* Interpret gfxboot-access-options keyword in isolinux.cfg; for example,

"v1 v2 m1" enables only the high contrast, magnifier, and keyboard
  modifiers options.

debian/changelog

@@ -9,6 +9,9 @@ gfxboot-theme-ubuntu (0.2.2) UNRELEASED; urgency=low
     1, 2, etc. select other menu items in order (closes: Malone #39303).
   * Rename accessibility menu options to describe technology rather than use
     case, per Henrik (closes: Malone #58836).
+  * Interpret gfxboot-access-options keyword in isolinux.cfg; for example,
+    "v1 v2 m1" enables only the high contrast, magnifier, and keyboard
+    modifiers options.
 
   * Add/update translations from Rosetta: Afrikaans, Arabic, Belarusian,
     Bengali, Catalan, Kashubian, Danish, Esperanto, Spanish, Estonian,

dia_access.inc

@@ -13,12 +13,20 @@
 /.access.v3 3 def
 /.access.m1 4 def
 
-/access.optionnames [
+/access.alloptionnames [
   .undef
   "v1" "v2" "v3"
   "m1"
 ] def
 
+/access.optionnames [ access.alloptionnames { } forall ] def
+
+/access.alltexts [
+  /txt_access_none
+  /txt_access_v1 /txt_access_v2 /txt_access_v3
+  /txt_access_m1
+] def
+
 % - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - - -
 % Initialise accessibility menu.
 %
@@ -31,9 +39,15 @@
   xmenu .xm_current .access.none put
 
   xmenu .xm_list [
-    /txt_access_none
-    /txt_access_v1 /txt_access_v2 /txt_access_v3
-    /txt_access_m1
+    access.optionnames {
+      0 1 access.alloptionnames length 1 sub {
+        over access.alloptionnames 2 index get eq {
+          access.alltexts exch get exch pop exit
+        } {
+          pop
+        } ifelse
+      } for
+    } forall
   ] put
 
   xmenu .xm_title /txt_access put

menuconfig.inc

@@ -224,6 +224,17 @@
         /panel.normal exch def
       } { pop } ifelse
     } if
+    dup "gfxboot-access-options" eq {
+      /access.optionnames [
+        .undef
+        4 index
+        {
+          menuconfig.skipspace dup 0 get 0 eq { exit } if
+          menuconfig.word exch
+        } loop
+        pop
+      ] def
+    } if
     dup "label" eq {
       over menuconfig.skipspace strdup /menuconfig.curlabel exch def
     } if