… | … | ||
---|---|---|---|
1971 | } elsif ($uni == 21) { # ctrl-u | 1971 | } elsif ($uni == 21) { # ctrl-u |
1972 | $text = ""; | 1972 | $text = ""; |
1973 | $self->{cursor} = 0; | 1973 | $self->{cursor} = 0; |
1974 | } elsif ($uni == 27) { | 1974 | } elsif ($uni == 27) { |
1975 | $self->emit ('escape'); | 1975 | $self->emit ('escape'); |
1976 | } elsif ($uni) { | 1976 | } elsif ($uni >= 0x20) { |
1977 | substr $text, $self->{cursor}++, 0, chr $uni; | 1977 | substr $text, $self->{cursor}++, 0, chr $uni; |
1978 | } else { | 1978 | } else { |
1979 | return 0; | 1979 | return 0; |
1980 | } | 1980 | } |
1981 | 1981 |
– | Removed lines |
+ | Added lines |
< | Changed lines |
> | Changed lines |