document accelerators, add one for OpenDir

This commit is contained in:
2025-05-11 14:28:44 -04:00
parent 05446c758b
commit 68a725b5ce

View File

@@ -201,6 +201,8 @@ func keyPress(e *tk.Event) {
log.Printf("state: %+v", directoryState) log.Printf("state: %+v", directoryState)
case "o": case "o":
newFileInDirectory() newFileInDirectory()
case "d":
newDirectory()
case "a": case "a":
if fileList == nil { if fileList == nil {
constructFileList() constructFileList()
@@ -227,9 +229,9 @@ func main() {
menubar := tk.Menu() menubar := tk.Menu()
fileMenu := menubar.Menu() fileMenu := menubar.Menu()
fileMenu.AddCommand(tk.Lbl("Open File"), tk.Accelerator("O"), tk.Command(newFileInDirectory)) fileMenu.AddCommand(tk.Lbl("Open File"), tk.Accelerator("O"), tk.Command(newFileInDirectory))
fileMenu.AddCommand(tk.Lbl("Open Directory"), tk.Command(newDirectory)) fileMenu.AddCommand(tk.Lbl("Open Directory"), tk.Accelerator("D"), tk.Command(newDirectory))
fileMenu.AddSeparator() fileMenu.AddSeparator()
checkbox := fileMenu.AddCheckbutton(tk.Lbl("Show Filelist")) checkbox := fileMenu.AddCheckbutton(tk.Lbl("Show Filelist"), tk.Accelerator("A"))
fileMenu.EntryConfigure(checkbox, fileListBindVar) fileMenu.EntryConfigure(checkbox, fileListBindVar)
menubar.AddCascade(tk.Lbl("File"), tk.Underline(0), tk.Mnu(fileMenu)) menubar.AddCascade(tk.Lbl("File"), tk.Underline(0), tk.Mnu(fileMenu))