Sorting ADE variables and outputs

In my ADE enviroment, I tend to end up with many variables and outputs.  ADE does not these lists and when you have a lot of variables and outputs it gets hard to find the one you are looking for.  So I wrote a small script to sort the lists,  but in order to see the results I have either: Save state and reload it to see sorted variables and outputs. Or create and then delete a dummy variable or output to update variables and outputs lists. Does anyone know how to update those lists in the ADE windows without doing the work around I mentioned?

Here is my code for sorting:

 cs=window(30)->sevSession ; Get session by using its window number

qq=copy(cs->variables) ; Get copy of variables

; Sort the variables
rr=sort( qq 'lambda( ( a b ) ( strcmp( a->name  b->name ) <= 0 ) ) )

; Renumber the variable index
cntr=1
foreach( x rr
       x->index=cntr
       cntr++
)
cs->variables=rr


qq2=copy(cs->outputs) ; Get copy of outputs

; Sort the outputs
rr2=sort( qq2 'lambda(
               ( a b )
               ; use non-nil fields for strcmp
               if( a~>name != nil
                 then name1 = a~>name
                 else if( a~>signal != nil
                    then name1 = a~>signal
                    else name1 = expression
                    )
                 )
               if( b~>name != nil
                 then name2 = b~>name
                 else if( b~>signal != nil
                    then name2 = b~>signal
                    else name2 = expression
                    )
                 )

               ( strcmp( name1  name2 ) <= 0 )
               )
       
       )

; Renumber the output index
cntr=1
foreach( x2 rr2
       x2->index=cntr
       cntr++
)
cs->outputs=rr2