… | |
… | |
34 | |
34 | |
35 | map ["$cmd$_", $text], |
35 | map ["$cmd$_", $text], |
36 | sort { (length $a) <=> (length $b) } |
36 | sort { (length $a) <=> (length $b) } |
37 | @args |
37 | @args |
38 | } sort { $a->{par} <=> $b->{par} } |
38 | } sort { $a->{par} <=> $b->{par} } |
39 | CFPlus::Pod::find command_help => "*"; |
39 | CFPlus::Pod::find command => "*"; |
40 | |
40 | |
41 | $self->{map_widget}->add_command (@$_) |
41 | $self->{map_widget}->add_command (@$_) |
42 | for @cmd_help; |
42 | for @cmd_help; |
43 | |
43 | |
44 | $self->{noface} = new_from_file CFPlus::Texture |
44 | $self->{noface} = new_from_file CFPlus::Texture |