scstadmin: List keys alphabetically in the -list_sessions output

git-svn-id: http://svn.code.sf.net/p/scst/svn/trunk@5410 d57e44dd-8a1f-0410-8b47-8ef2f437770f
This commit is contained in:
Bart Van Assche
2014-04-06 20:26:08 +00:00
parent ef9d1b9001
commit c664dcb277

View File

@@ -3414,11 +3414,11 @@ sub listAttributes {
my $found = FALSE;
foreach my $attribute (keys %{$attributes}) {
foreach my $attribute (sort keys %{$attributes}) {
my $first = TRUE;
if (defined($$attributes{$attribute}->{'keys'})) {
foreach my $key (keys %{$$attributes{$attribute}->{'keys'}}) {
foreach my $key (sort keys %{$$attributes{$attribute}->{'keys'}}) {
my $value = $$attributes{$attribute}->{'keys'}->{$key}->{'value'};
my $static = ($$attributes{$attribute}->{'static'}) ? 'No' : 'Yes';
$value = '<not set>' if ($value eq '');