diff options
author | Tom Ryder <tom@sanctum.geek.nz> | 2016-06-19 11:31:49 +1200 |
---|---|---|
committer | Tom Ryder <tom@sanctum.geek.nz> | 2016-06-19 11:31:49 +1200 |
commit | e83abe896c2c0e6ef0b2b2c8ecb8e8e07ac6a876 (patch) | |
tree | 2f4c464c5fd9e06ec9a6fe5f182ff3c9155cff53 /urxvt | |
parent | Perl::Tidy run (diff) | |
download | dotfiles-e83abe896c2c0e6ef0b2b2c8ecb8e8e07ac6a876.tar.gz dotfiles-e83abe896c2c0e6ef0b2b2c8ecb8e8e07ac6a876.zip |
Fix needless interpolation
Diffstat (limited to 'urxvt')
-rw-r--r-- | urxvt/ext/selection | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/urxvt/ext/selection b/urxvt/ext/selection index d09eaf19..32d2f9df 100644 --- a/urxvt/ext/selection +++ b/urxvt/ext/selection @@ -17,7 +17,7 @@ our $VERSION = 1.0; sub on_init { my ($self) = @_; - if ( defined( my $res = $self->resource("cutchars") ) ) { + if ( defined( my $res = $self->resource('cutchars') ) ) { $res = $self->locale_decode($res); push @{ $self->{patterns} }, qr{\G [\Q$res\E[:space:]]* ([^\Q$res\E[:space:]]+) }x; |