Исправлено закерытие вкладки по щелчку мыши.

Добавлена настройка переноса строк в редакторе.
Добавлены сочетания клавиш ctrl+pgup cntrl+pgdown  для переключения  между вкладками редактора.
Добавлен диалог закрытия папки (каталога)
This commit is contained in:
svkalinin
2022-08-30 16:44:28 +03:00
parent 1142324008
commit ec3e4ac12e
8 changed files with 102 additions and 30 deletions

View File

@@ -24,13 +24,31 @@ namespace eval NB {
}
}
}
puts "NB item - $fm"
# puts "NB item - $fm"
return $fm
}
proc CloseTab {w x y} {
proc PressTab {w x y} {
$w select [$w identify tab $x $y]
if {[$w identify $x $y] == "close_button"} {
FileOper::Close
} else {
set txt [$w select].frmText.t
focus -force $txt.t
}
}
proc NextTab {w step} {
set i [expr [$w index end] - 1]
set nbItemIndex [$w index [$w select]]
if {$nbItemIndex eq 0 && $step eq "-1"} {
$w select $i
} elseif {$nbItemIndex eq $i && $step eq "1"} {
$w select 0
} else {
$w select [expr $nbItemIndex + $step]
}
set txt [$w select].frmText.t
focus -force $txt.t
}
}