OpenGrok

35 # event state) versus output (xterm mouse-code).
53 # xterm uses code 3 internally for release-events.
55     my $code   = shift;
57     if ( $code < 0 ) {
61         $result = sprintf "Button%d", ( $code > 3 ) ? $code : ( $code + 1 );
82     my $code   = shift;
84     $result = " + motion" if ( $code != 0 );
112                 my $code   = sprintf "%3d",    $result;
115                 if ( defined $encoded{$code} ) {
116                     printf "OOPS %s ->%s versus %s\n", $code, $report,
117                       $encoded{$code};
120                     printf "OOPS %s ->%s\n", $code, $report;
122                 $encoded{$code}   = $report;
133         foreach my $code ( sort keys %encoded ) {
134             printf "%s = %s\n", $code, $encoded{$code};
145 	-i	invert the report to show code for each combination

Indexes created Sat Aug 15 00:25:12 UTC 2026