'is-open', # for 'summary', 'list'
'is-closed', # for 'summary', 'list'
'is-mine', # for 'summary', 'list'
+ 'mine', # for 'add'
'help',
'version',
);
'is-open' => 1,
'is-closed' => 1,
'is-mine' => 1,
+ 'mine' => 1,
);
## ----------------------------------------------------------------------------
sub name { 'add' }
sub run {
- my ($self, $cil, undef, @argv) = @_;
+ my ($self, $cil, $args, @argv) = @_;
CIL::Utils->ensure_interactive();
$issue->Summary( join ' ', @argv );
$issue->Status('New');
$issue->CreatedBy( $user );
+ $issue->AssignedTo( $user )
+ if $args->{mine};
$issue->Description("Description ...");
CIL::Utils->add_issue_loop($cil, undef, $issue);