Preferences: fix a bug in "list all" sorting

We compared $_->[0] to $_->[1]. Just two simple bugs in close formation. We needed $a and $b, and we needed the same index.
fastmail · Mar 10, 2023 · a968615 · a968615
1 parent 9b45da8
commit a968615
Showing 1 changed file with 1 addition and 1 deletion.
diff --git a/lib/Synergy/Reactor/Preferences.pm b/lib/Synergy/Reactor/Preferences.pm
@@ -193,7 +193,7 @@ sub handle_list ($self, $event) {
     grep {; $_->does('Synergy::Role::HasPreferences') } $self->hub->reactors;
 
   my $text = qq{*Known preferences are:*\n};
-  for my $source (sort { $_->[0] cmp $_->[1] } @sources) {
+  for my $source (sort { $a->[0] cmp $b->[0] } @sources) {
     my ($ns, $has_pref) = @$source;
 
     my $help = $has_pref->preference_help;