… | |
… | |
63 | or $a->[1] cmp $b->[1] |
63 | or $a->[1] cmp $b->[1] |
64 | } @command_list; |
64 | } @command_list; |
65 | |
65 | |
66 | cf::cede_to_tick; |
66 | cf::cede_to_tick; |
67 | |
67 | |
|
|
68 | cf::face::set |
68 | cf::set_face "res/command_list" => cf::FT_RSRC, |
69 | "res/command_list" => cf::FT_RSRC, |
69 | JSON::XS->new->utf8->encode (\@command_list); |
70 | JSON::XS->new->utf8->encode (\@command_list); |
70 | } |
71 | } |
71 | |
72 | |
72 | our $DOCLET_HANDLER = ext::doclet::register command => sub { |
73 | our $DOCLET_HANDLER = ext::doclet::register command => sub { |
73 | my ($pl, $category, $command) = @_; |
74 | my ($pl, $category, $command) = @_; |
74 | |
75 | |