repo: rxvt-unicode-sixel
action: commit
revision: 
path_from: 
revision_from: 53687e563a10fd3d07eb73f76e0cf2d86a3b24f1:
path_to: 
revision_to: 

commit 53687e563a10fd3d07eb73f76e0cf2d86a3b24f1
Author: Emanuele Giaquinta 
Date:   Sun Jun 15 21:06:53 2014 +0000

    Define $off also when $col is 0.

diff --git a/src/perl/matcher b/src/perl/matcher

--- a/src/perl/matcher
+++ b/src/perl/matcher
@@ -257,7 +257,7 @@ sub find_matches {
    my ($self, $row, $col) = @_;
    my $line = $self->line ($row);
    my $text = $line->t;
-   my $off = $line->offset_of ($row, $col) if $col;
+   my $off = $line->offset_of ($row, $col) if defined $col;

    my @matches;
    for my $matcher (@{$self->{matchers}}) {

-----END OF PAGE-----