Added binding mouse button: click on notebook tab highlight opened file name in tree

Change "Paste from Clipboard" function
Change popup editor menu (undo, redo, copy, paste, cut functions)
This commit is contained in:
Sergey Kalinin
2018-02-05 12:08:16 +03:00
parent cc7bbf9a59
commit 8cf4ded785
33 changed files with 69 additions and 9437 deletions

View File

@@ -1,10 +1,9 @@
#!/usr/bin/wish
###########################################################
# Tcl/Tk Project Manager #
# Distrubuted under GPL #
# Copyright (c) "Sergey Kalinin", 2002, http://nuk-svk.ru #
# Author: Sergey Kalinin banzaj28@yandex.ru #
# Copyright (c) "Sergey Kalinin", 2001, http://nuk-svk.ru #
# Author: Sergey Kalinin banzaj28@yandex.ru #
###########################################################
########## VERSION INFORMATION ##########
@@ -17,7 +16,6 @@ package require msgcat
set rootDir "/usr"
set tclDir "/usr/bin"
##
if {[file exists $env(HOME)/projects/tcl/projman]==1} {
set dataDir "[file join $env(HOME) projects tcl projman lib]"
set docDir "[file join $env(HOME) projects tcl projman hlp ru]"
@@ -88,9 +86,6 @@ foreach modFile [lsort [glob -nocomplain [file join $hlDir *.tcl]]] {
source [file join $dataDir main.tcl]
#set editor(selectBorder) "0"
#option add *tree.foreground red widgetDefault
# Set colors for widgets
option add *Frame.background $editor(bg) startupFile
@@ -122,3 +117,4 @@ option add *Listbox.foreground $editor(fg) startupFile
option add *Listbox.background $editor(bg) startupFile
option add *Scrollbar.background $editor(bg) startupFile