| line |
stmt |
bran |
cond |
sub |
pod |
time |
code |
|
1
|
|
|
|
|
|
|
package Kephra::API; |
|
2
|
|
|
|
|
|
|
our $VERSION = '0.02'; |
|
3
|
|
|
|
|
|
|
|
|
4
|
1
|
|
|
1
|
|
942
|
use strict; |
|
|
1
|
|
|
|
|
2
|
|
|
|
1
|
|
|
|
|
37
|
|
|
5
|
1
|
|
|
1
|
|
5
|
use warnings; |
|
|
1
|
|
|
|
|
1
|
|
|
|
1
|
|
|
|
|
260
|
|
|
6
|
|
|
|
|
|
|
|
|
7
|
|
|
|
|
|
|
# passive part, just getter |
|
8
|
0
|
|
|
0
|
0
|
|
sub settings { Kephra::Config::Global::settings() } |
|
9
|
0
|
|
|
0
|
0
|
|
sub localisation { Kephra::Config::Localisation::strings() } |
|
10
|
0
|
|
|
0
|
0
|
|
sub commands { Kephra::CommandList::data() } |
|
11
|
0
|
|
|
0
|
0
|
|
sub events { Kephra::EventTable::_table() } |
|
12
|
0
|
|
|
0
|
0
|
|
sub menu { Kephra::Menu::_all() } |
|
13
|
0
|
|
|
0
|
0
|
|
sub toolbar { Kephra::ToolBar::_all() } |
|
14
|
|
|
|
|
|
|
|
|
15
|
|
|
|
|
|
|
# active part |
|
16
|
|
|
|
|
|
|
sub run_cmd { |
|
17
|
0
|
|
|
0
|
0
|
|
my @cmd; |
|
18
|
0
|
|
|
|
|
|
push @cmd, split /\s*,\s*/, $_ for @_; |
|
19
|
0
|
|
|
|
|
|
Kephra::CommandList::run_cmd_by_id($_) for @cmd; |
|
20
|
|
|
|
|
|
|
} |
|
21
|
|
|
|
|
|
|
|
|
22
|
|
|
|
|
|
|
1; |
|
23
|
|
|
|
|
|
|
|
|
24
|
|
|
|
|
|
|
=head1 NAME |
|
25
|
|
|
|
|
|
|
|
|
26
|
|
|
|
|
|
|
Kephra::API - Interface between Modules and Plugins |
|
27
|
|
|
|
|
|
|
|
|
28
|
|
|
|
|
|
|
=head1 DESCRIPTION |
|
29
|
|
|
|
|
|
|
|
|
30
|
|
|
|
|
|
|
=cut |