Commit | Line | Data |
---|---|---|
86530b38 AT |
1 | |
2 | =head1 NAME | |
3 | ||
4 | Tk::Submethods - add aliases for tk sub-commands | |
5 | ||
6 | =for pm Tk/Submethods.pm | |
7 | ||
8 | =for category Implementation | |
9 | ||
10 | =head1 SYNOPSIS | |
11 | ||
12 | use Tk::Submethods ( 'command1' => [qw(sub1 sub2 sub3)], | |
13 | 'command2' => [qw(sub1 sub2 sub3)]); | |
14 | ||
15 | =head1 DESCRIPTION | |
16 | ||
17 | Creates C<-E<gt>commandSub(...)> as an alias for C<-E<gt>command('sub',...)> | |
18 | e.g. C<-E<gt>grabRelease> for C<-E<gt>grab('release')>. | |
19 | ||
20 | For each command/subcommand pair this creates a closure with command | |
21 | and subcommand as bound lexical variables and assigns a reference to this | |
22 | to a 'glob' in the callers package. | |
23 | ||
24 | Someday the sub-commands may be created directly in the C code. | |
25 | ||
26 | =cut | |
27 |