File tree Expand file tree Collapse file tree 1 file changed +8
-9
lines changed Expand file tree Collapse file tree 1 file changed +8
-9
lines changed Original file line number Diff line number Diff line change @@ -205,6 +205,14 @@ package body LSP.Ada_Configurations is
205205 and then JSON (Index).Kind = Start_Object
206206 then
207207 Parse_Variables (Index);
208+ Sort_Variables (1 , Variables_Names.Length);
209+
210+ Reload := Reload or else
211+ Variables_Names /= Self.Variables_Names or else
212+ Variables_Values /= Self.Variables_Values;
213+
214+ Self.Variables_Names := Variables_Names;
215+ Self.Variables_Values := Variables_Values;
208216
209217 elsif Name = " defaultCharset"
210218 and then JSON (Index).Kind = String_Value
@@ -288,15 +296,6 @@ package body LSP.Ada_Configurations is
288296
289297 Skip_Value (JSON, Index);
290298 end loop ;
291-
292- Sort_Variables (1 , Variables_Names.Length);
293-
294- Reload := Reload or else
295- Variables_Names /= Self.Variables_Names or else
296- Variables_Values /= Self.Variables_Values;
297-
298- Self.Variables_Names := Variables_Names;
299- Self.Variables_Values := Variables_Values;
300299 end Parse_Ada ;
301300
302301 -- ------------------
You can’t perform that action at this time.
0 commit comments