Module Tk::Menu::TkInternalFunction

# File ext/tk/lib/tk/menu.rb, line 410
def next_entry(menu, delta)
  # delta is increment value of entry index.
  # For example, +1 denotes 'next entry' and -1 denotes 'previous entry'.
  Tk.tk_call('::tk::MenuNextEntry', menu, delta)
end

# File ext/tk/lib/tk/menu.rb, line 398
def next_menu(menu, dir='next')
  dir = dir.to_s
  case dir
  when 'next', 'forward', 'down'
    dir = 'right'
  when 'previous', 'backward', 'up'
    dir = 'left'
  end

  Tk.tk_call('::tk::MenuNextMenu', menu, dir)
end