--- tabbed_ 2008-03-10 20 29 41 000000000 0300 tabbed 2008-03-10 20 30

 1
 2
 3
 4
 5
 6
 7
 8
 9
10
--- tabbed_ 2008-03-10 20:29:41.000000000 +0300
+++ tabbed 2008-03-10 20:30:28.000000000 +0300
@@ -309,7 +309,7 @@
sub tab_key_press {
my ($self, $tab, $event, $keysym, $str) = @_;
- if ($event->{state} & urxvt::ShiftMask) {
+ if ($event->{state} & urxvt::ControlMask) {
if ($keysym == 0xff51 || $keysym == 0xff53) {
my ($idx) = grep $self->{tabs}[$_] == $tab, 0 .. $#{ $self->{tabs} };