Mercurial Hosting > editor
comparison src/luan_editor/menu.luan @ 56:6059b4e22d47
almost fix to front
| author | Franklin Schmidt <fschmidt@gmail.com> |
|---|---|
| date | Wed, 28 May 2025 16:02:27 -0600 |
| parents | 77ee3a37475a |
| children | 7e2d6426c155 |
comparison
equal
deleted
inserted
replaced
| 55:77ee3a37475a | 56:6059b4e22d47 |
|---|---|
| 14 local show_input_dialog = Option_pane.show_input_dialog or error() | 14 local show_input_dialog = Option_pane.show_input_dialog or error() |
| 15 local Frame = require "luan:swing/Frame.luan" | 15 local Frame = require "luan:swing/Frame.luan" |
| 16 local get_all_frames = Frame.get_all_frames or error() | 16 local get_all_frames = Frame.get_all_frames or error() |
| 17 local Spell_checker = require "classpath:luan_editor/Spell_checker.luan" | 17 local Spell_checker = require "classpath:luan_editor/Spell_checker.luan" |
| 18 local spell_check = Spell_checker.spell_check or error() | 18 local spell_check = Spell_checker.spell_check or error() |
| 19 local Window = require "classpath:luan_editor/Window.luan" | |
| 20 local show_list_window = Window.show_list_window or error() | |
| 19 | 21 |
| 20 | 22 |
| 21 local function action_listener(fn) | 23 local function action_listener(fn) |
| 22 return function(_) | 24 return function(_) |
| 23 fn() | 25 fn() |
| 263 end | 265 end |
| 264 } | 266 } |
| 265 new_menu_item{ | 267 new_menu_item{ |
| 266 text = "List Windows" | 268 text = "List Windows" |
| 267 accelerator = "meta L" | 269 accelerator = "meta L" |
| 268 action_listener = action_listener(window.show_list_window) | 270 action_listener = action_listener(show_list_window) |
| 269 } | 271 } |
| 270 } | 272 } |
| 271 } | 273 } |
| 272 } | 274 } |
| 273 } | 275 } |
