ListPicker is disabled in Mathematica 13.0

Hello all,

ListPicker is disabled in Mathematica 13.0.
The following code runs OK in Mathematica 12.3, but ListPicker seems to be disabled in version 13.0:

LPTest[] :=
  Module[{lis},
   lis = {"English", "Japanese", "Spanish", "French"};
   selP = {"English"};
   DialogInput[Column[{
       TextCell["Select language"],
      ListPicker[Dynamic[selP], lis, FieldSize -> {25, {1, 20}} , 
       Scrollbars -> {False, Length[lis] > 20}, 
       Multiselection -> False, BaseStyle -> {FontSize -> 14}, 
       Enabled -> True],
      "",
      Row[{"", Button["  Exit  ", DialogReturn[act1 = "EXIT"]], ""}],
      }, Alignment -> Center], Modal -> True];
   ];
LPTest[]

Any way to fix this issue?

Thanks in advance.

César Lozada

Works fine for me on “13.0.1 for Mac OS X ARM (64-bit) (January 28, 2022)”.