Skip to content

Commit 3bd8032

Browse files
robnmmcclimon
authored andcommitted
prefs: more ways to ask for settings
Seriously I spent ten minutes this morning trying to figure out what one of the prefs was named and what mine was set to.
1 parent 596ef21 commit 3bd8032

File tree

1 file changed

+4
-3
lines changed

1 file changed

+4
-3
lines changed

lib/Synergy/Reactor/Preferences.pm

Lines changed: 4 additions & 3 deletions
Original file line numberDiff line numberDiff line change
@@ -29,7 +29,7 @@ sub listener_specs {
2929
exclusive => 1,
3030
predicate => sub ($self, $e) {
3131
return unless $e->was_targeted;
32-
return unless $e->text =~ /\Alist\s+all\s+preferences\s*\z/i;
32+
return unless $e->text =~ /\Alist(\s+all)?\s+(settings|pref(erence)s?)\s*\z/i;
3333
},
3434
},
3535
{
@@ -38,8 +38,9 @@ sub listener_specs {
3838
exclusive => 1,
3939
predicate => sub ($self, $e) {
4040
return unless $e->was_targeted;
41-
return 1 if $e->text =~ /\Adump\s+my\s+pref(erence)?s/in;
42-
return 1 if $e->text =~ /\Adump\s+pref(erence)?s\s+for/in;
41+
return 1 if $e->text =~ /\Apref(erence)?s\z/in;
42+
return 1 if $e->text =~ /\A(dump|show)(\s+my)?\s+(settings|pref(erence)?s)/in;
43+
return 1 if $e->text =~ /\A(dump|show)\s+(settings|pref(erence)?s)\s+for/in;
4344
return;
4445
},
4546
}

0 commit comments

Comments
 (0)