… | |
… | |
39 | |
39 | |
40 | =over 4 |
40 | =over 4 |
41 | |
41 | |
42 | =item selection |
42 | =item selection |
43 | |
43 | |
44 | Intelligent selection. This etxension tries to be more intelligent when the user |
44 | Intelligent selection. This extension tries to be more intelligent when |
45 | extends selections (double-click). |
45 | the user extends selections (double-click). Right now, it tries to select |
|
|
46 | urls and complete shell-quoted arguments, which is very convenient, too, |
|
|
47 | if your F<ls> supports C<--quoting-style=shell>. |
46 | |
48 | |
47 | It also offers the following bindable event: |
49 | It also offers the following bindable event: |
48 | |
50 | |
49 | =over 4 |
51 | =over 4 |
50 | |
52 | |
… | |
… | |
383 | my $cb = $TERM->{_hook}[$htype] |
385 | my $cb = $TERM->{_hook}[$htype] |
384 | or return; |
386 | or return; |
385 | |
387 | |
386 | verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")" |
388 | verbose 10, "$HOOKNAME[$htype] (" . (join ", ", $TERM, @_) . ")" |
387 | if $verbosity >= 10; |
389 | if $verbosity >= 10; |
|
|
390 | |
|
|
391 | keys %$cb; |
388 | |
392 | |
389 | while (my ($pkg, $cb) = each %$cb) { |
393 | while (my ($pkg, $cb) = each %$cb) { |
390 | return 1 |
394 | return 1 |
391 | if $cb->( |
395 | if $cb->( |
392 | $TERM->{$pkg} ||= do { |
396 | $TERM->{$pkg} ||= do { |