ViewVC Help
View File | Revision Log | Show Annotations | Download File
/cvs/rxvt-unicode/src/perl/tabbed
(Generate patch)

Comparing rxvt-unicode/src/perl/tabbed (file contents):
Revision 1.37 by root, Sat May 17 13:38:23 2014 UTC vs.
Revision 1.38 by sf-exg, Fri Jan 16 20:13:01 2015 UTC

214 214
215sub on_key_press { 215sub on_key_press {
216 my ($self, $event) = @_; 216 my ($self, $event) = @_;
217 217
218 $self->{cur}->key_press ($event->{state}, $event->{keycode}, $event->{time}); 218 $self->{cur}->key_press ($event->{state}, $event->{keycode}, $event->{time});
219 $self->{cur}->refresh_check;
219 220
220 1 221 1
221} 222}
222 223
223sub on_key_release { 224sub on_key_release {
224 my ($self, $event) = @_; 225 my ($self, $event) = @_;
225 226
226 $self->{cur}->key_release ($event->{state}, $event->{keycode}, $event->{time}); 227 $self->{cur}->key_release ($event->{state}, $event->{keycode}, $event->{time});
228 $self->{cur}->refresh_check;
227 229
228 1 230 1
229} 231}
230 232
231sub on_button_press { 233sub on_button_press {

Diff Legend

Removed lines
+ Added lines
< Changed lines
> Changed lines