| … | |
… | |
| 155 | $self->{ctrl}++; |
155 | $self->{ctrl}++; |
| 156 | $::CONN->user_send ("run $DIR{$sym}[0]"); |
156 | $::CONN->user_send ("run $DIR{$sym}[0]"); |
| 157 | } else { |
157 | } else { |
| 158 | $::CONN->user_send ("$DIR{$sym}[1]"); |
158 | $::CONN->user_send ("$DIR{$sym}[1]"); |
| 159 | } |
159 | } |
| 160 | } elsif ($ev->{unicode}) { |
160 | } elsif ((ord 'a') <= $uni && $uni <= (ord 'z')) { |
| 161 | $self->{completer}->key_down ($ev); |
161 | $self->{completer}->key_down ($ev); |
| 162 | $self->{completer}->show; |
162 | $self->{completer}->show; |
| 163 | } |
163 | } |
| 164 | } |
164 | } |
| 165 | |
165 | |
