sub TaskGenJobExecDisplay::_Menu ()
{
  my TaskGenJobExecDisplay $self = shift;

  my $contextMenu = $self->jobTree()->Menu( -tearoff => 0 );
  $contextMenu->add(
             'command',
             -label   => 'Kill',
             -command => sub { $self->onMenuKill(@_) },
             -font    => $tool_config::FONT_BIG
  );

  $contextMenu->add(
             'command',
             -label   => 'Delete',
             -command => sub { print TE "deleting jobs :$self \n";$self->onMenuDelete(@_);weaken($self); $logger->info(Devel::FindRef::track \$self); },
             -font    => $tool_config::FONT_BIG
  );
  $contextMenu->add('separator');

  $contextMenu->add(
             'command',
             -label   => 'Edit Profile',
             -command => sub { $self->onMenuEditProfile(@_) },
             -font    => $tool_config::FONT_BIG
  );

  $contextMenu->add('separator');
  $contextMenu->add(
             'command',
             -label   => 'Show Logfile',
             -command => sub { $self->onMenuShowLogfile(0) },
             -font    => $tool_config::FONT_BIG
  );

  $contextMenu->add(
             'command',
             -label   => 'Show Logfile Sep. Window',
             -command => sub { $self->onMenuShowLogfile(1) },
             -font    => $tool_config::FONT_BIG
  );
  $contextMenu->add('separator');
  $contextMenu->add(
             'command',
             -label   => 'Restart',
             -command => sub { $self->onMenuRestart( @_, 0 ) },
             -font    => $tool_config::FONT_BIG
  );

  $contextMenu->add(
             'command',
             -label   => 'Edit & Restart',
             -command => sub { $self->onMenuRestart( @_, 1 ) },
             -font    => $tool_config::FONT_BIG
  );

    $contextMenu->add(
        'command',
        -label   => 'Restart (incl. predecessors)',
        -command => sub { $self->onMenuRestartWithPredecessors( @_, 0 ) },
        -font    => $tool_config::FONT_BIG
    );

  $contextMenu->add('separator');
  $contextMenu->add(
             'command',
             -label   => 'Unlock',
             -command => sub { $self->onMenuUnlock(@_) },
             -font    => $tool_config::FONT_BIG
  );
  $contextMenu->add(
             'command',
             -label   => 'Force Ok',
             -command => sub { $self->onMenuForceStatus( @_, $communication::OK ) },
             -font    => $tool_config::FONT_BIG
  );
  $contextMenu->add(
             'command',
             -label   => 'Force failed',
             -command => sub { $self->onMenuForceStatus( @_, $communication::ERROR ) },
             -font    => $tool_config::FONT_BIG
  );