Eskil

Check-in [949423de93]
Login

Many hyperlinks are disabled.
Use anonymous login to enable hyperlinks.

Overview
Comment:Cleanup depencies
Downloads: Tarball | ZIP archive
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1: 949423de930b369555e401087608ff92b70ea8f9
User & Date: peter 2012-02-11 14:15:20.212
Context
2012-02-12
01:25
Add debug item to disable C version of DiffUtil check-in: 245c56a7e0 user: peter tags: trunk
2012-02-11
14:15
Cleanup depencies check-in: 949423de93 user: peter tags: trunk
2012-02-07
17:36
Handle missing directory check-in: 76fb548020 user: peter tags: trunk
Changes
Unified Diff Ignore Whitespace Patch
Changes to Makefile. 
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30

#----------------------------------------------------------------------
# Make file for Eskil
#----------------------------------------------------------------------

VERSION = 261

# Path to the TclKits used for creating StarPacks.
TCLKIT = /home/peter/tclkit/v85
TCLKIT_LINUX   = $(TCLKIT)/tclkit-8.5.8
TCLKIT_SOLARIS = $(TCLKIT)/tclkit-solaris-sparc
TCLKIT_WIN     = $(TCLKIT)/tclkit-win32.upx.exe

# Path to the libraries used
STYLE      = /home/peter/src/packages/style
GRIFFIN    = /home/peter/tclkit/griffin.vfs/lib/griffin
TEXTSEARCH = /home/peter/src/textsearch
DIFFUTIL   = /home/peter/src/DiffUtilTcl/lib.vfs/DiffUtil
WCB        = /home/peter/src/packages/wcb3.0
PDF4TCL    = /home/peter/src/pdf4tcl/pkg
SNIT       = /home/peter/tcl/tcllib/modules/snit
STRUCT     = /home/peter/tcl/tcllib/modules/struct
CMDLINE    = /home/peter/tcl/tcllib/modules/cmdline
TABLELIST  = /home/peter/src/packages/tablelist/tablelist
TWAPI      = /home/peter/src/packages/twapi
TKDND      = /home/peter/src/packages/tkdnd/lib/tkdnd1.0

# Tools
NAGELFAR    = nagelfar

all: setup









|




<
<


|

|
|
|
|








1
2
3
4
5
6
7
8
9
10
11
12
13


14
15
16
17
18
19
20
21
22
23
24
25
26
27
28

#----------------------------------------------------------------------
# Make file for Eskil
#----------------------------------------------------------------------

VERSION = 261

# Path to the TclKits used for creating StarPacks.
TCLKIT = /home/peter/tclkit/v85
TCLKIT_LINUX   = $(TCLKIT)/tclkit-linux-x86
TCLKIT_SOLARIS = $(TCLKIT)/tclkit-solaris-sparc
TCLKIT_WIN     = $(TCLKIT)/tclkit-win32.upx.exe

# Path to the libraries used


TEXTSEARCH = /home/peter/src/textsearch
DIFFUTIL   = /home/peter/src/DiffUtilTcl/lib.vfs/DiffUtil
WCB        = /home/peter/src/packages/wcb3.4
PDF4TCL    = /home/peter/src/pdf4tcl/pkg
SNIT       = /home/peter/src/packages/tcllib/modules/snit
STRUCT     = /home/peter/src/packages/tcllib/modules/struct
CMDLINE    = /home/peter/src/packages/tcllib/modules/cmdline
TABLELIST  = /home/peter/src/packages/tablelist5.5
TWAPI      = /home/peter/src/packages/twapi
TKDND      = /home/peter/src/packages/tkdnd/lib/tkdnd1.0

# Tools
NAGELFAR    = nagelfar

all: setup
︙︙
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66

	cd eskil.vfs ; ln -s ../doc
eskil.vfs/plugins:
	cd eskil.vfs ; ln -s ../plugins
eskil.vfs/COPYING:
	cd eskil.vfs ; ln -s ../COPYING
eskil.vfs/lib/wcb:
	cd eskil.vfs/lib ; ln -s $(WCB) wcb
eskil.vfs/lib/style:
#	cd eskil.vfs/lib ; ln -s $(STYLE) style
eskil.vfs/lib/griffin:
	cd eskil.vfs/lib ; ln -s $(GRIFFIN) griffin
eskil.vfs/lib/textsearch:
	cd eskil.vfs/lib ; ln -s $(TEXTSEARCH) textsearch
eskil.vfs/lib/diffutil:
	cd eskil.vfs/lib ; ln -s $(DIFFUTIL) diffutil
eskil.vfs/lib/pdf4tcl:
	cd eskil.vfs/lib ; ln -s $(PDF4TCL) pdf4tcl
eskil.vfs/lib/tkdnd:








<
<
<
<








47
48
49
50
51
52
53




54
55
56
57
58
59
60

	cd eskil.vfs ; ln -s ../doc
eskil.vfs/plugins:
	cd eskil.vfs ; ln -s ../plugins
eskil.vfs/COPYING:
	cd eskil.vfs ; ln -s ../COPYING
eskil.vfs/lib/wcb:
	cd eskil.vfs/lib ; ln -s $(WCB) wcb




eskil.vfs/lib/textsearch:
	cd eskil.vfs/lib ; ln -s $(TEXTSEARCH) textsearch
eskil.vfs/lib/diffutil:
	cd eskil.vfs/lib ; ln -s $(DIFFUTIL) diffutil
eskil.vfs/lib/pdf4tcl:
	cd eskil.vfs/lib ; ln -s $(PDF4TCL) pdf4tcl
eskil.vfs/lib/tkdnd:
︙︙
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99


links: eskil.vfs/src/eskil.tcl \
	eskil.vfs/src/images \
	eskil.vfs/examples\
	eskil.vfs/doc\
	eskil.vfs/plugins\
	eskil.vfs/COPYING\
	eskil.vfs/lib/griffin\
	eskil.vfs/lib/style\
	eskil.vfs/lib/textsearch\
	eskil.vfs/lib/diffutil\
	eskil.vfs/lib/pdf4tcl\
	eskil.vfs/lib/snit\
	eskil.vfs/lib/struct\
	eskil.vfs/lib/cmdline\
	eskil.vfs/lib/tkdnd\








<
<








78
79
80
81
82
83
84


85
86
87
88
89
90
91


links: eskil.vfs/src/eskil.tcl \
	eskil.vfs/src/images \
	eskil.vfs/examples\
	eskil.vfs/doc\
	eskil.vfs/plugins\
	eskil.vfs/COPYING\


	eskil.vfs/lib/textsearch\
	eskil.vfs/lib/diffutil\
	eskil.vfs/lib/pdf4tcl\
	eskil.vfs/lib/snit\
	eskil.vfs/lib/struct\
	eskil.vfs/lib/cmdline\
	eskil.vfs/lib/tkdnd\
︙︙
Changes to src/eskil.tcl.
︙︙
3596
3597
3598
3599
3600
3601
3602
3603
3604
3605
3606
3607







3608
3609

3610
3611
3612
3613
3614
3615
3616
















































































































3617
3618
3619
3620
3621
3622
3623

            [list EditPrefRegsubUpdate $top]
    trace add variable ::eskil($top,prefregexa2) write \
            [list EditPrefRegsubUpdate $top]
    EditPrefRegsubUpdate $top
}

proc defaultGuiOptions {} {
    catch {package require griffin}

    option add *Menu.tearOff 0
    option add *Button.padX 5
    if {[tk windowingsystem] eq "x11"} {







        option add *Menu.activeBorderWidth 1
        option add *Menu.borderWidth 1


        option add *Listbox.exportSelection 0
        option add *Listbox.borderWidth 1
        #option add *Listbox.highlightThickness 1
        option add *Font "Helvetica -12"
        option add *Scrollbar.highlightThickness 0
        option add *Scrollbar.takeFocus 0
















































































































    }

    if {$::tcl_platform(platform) eq "windows"} {
        option add *Panedwindow.sashRelief flat
        option add *Panedwindow.sashWidth 4
        option add *Panedwindow.sashPad 0
        #option add *Menubutton.activeBackground SystemHighlight








<
<



>
>
>
>
>
>
>
|

>
|






>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>
>








3596
3597
3598
3599
3600
3601
3602


3603
3604
3605
3606
3607
3608
3609
3610
3611
3612
3613
3614
3615
3616
3617
3618
3619
3620
3621
3622
3623
3624
3625
3626
3627
3628
3629
3630
3631
3632
3633
3634
3635
3636
3637
3638
3639
3640
3641
3642
3643
3644
3645
3646
3647
3648
3649
3650
3651
3652
3653
3654
3655
3656
3657
3658
3659
3660
3661
3662
3663
3664
3665
3666
3667
3668
3669
3670
3671
3672
3673
3674
3675
3676
3677
3678
3679
3680
3681
3682
3683
3684
3685
3686
3687
3688
3689
3690
3691
3692
3693
3694
3695
3696
3697
3698
3699
3700
3701
3702
3703
3704
3705
3706
3707
3708
3709
3710
3711
3712
3713
3714
3715
3716
3717
3718
3719
3720
3721
3722
3723
3724
3725
3726
3727
3728
3729
3730
3731
3732
3733
3734
3735
3736
3737
3738
3739
3740
3741

            [list EditPrefRegsubUpdate $top]
    trace add variable ::eskil($top,prefregexa2) write \
            [list EditPrefRegsubUpdate $top]
    EditPrefRegsubUpdate $top
}

proc defaultGuiOptions {} {


    option add *Menu.tearOff 0
    option add *Button.padX 5
    if {[tk windowingsystem] eq "x11"} {
	option add *Button.padY 1
	option add *Listbox.selectBorderWidth 0
	option add *Entry.selectBorderWidth 0
	option add *Text.selectBorderWidth 0
	option add *highlightThickness 0
	option add *Scrollbar.borderWidth 1

	option add *Menu.activeBorderWidth 1
        option add *Menu.borderWidth 1
	option add *Menubutton.highlightThickness 0
 
        option add *Listbox.exportSelection 0
        option add *Listbox.borderWidth 1
        #option add *Listbox.highlightThickness 1
        option add *Font "Helvetica -12"
        option add *Scrollbar.highlightThickness 0
        option add *Scrollbar.takeFocus 0
	option add *Panedwindow.showHandle 0
    }

    # other Win2K like color changes 
    if {[tk windowingsystem]=="x11"} {
	set SystemButtonFace #D4D0C8
	set SystemButtonText #000000
	set SystemHighlight #0A226A
	set SystemHighlightText #ffffff
	set SystemWindow #ffffff
	set SystemWindowText #000000
	set SystemWindowFrame #000000
	set NORMAL_BG $SystemButtonFace
	set NORMAL_FG $SystemButtonText
	set SELECT_BG $SystemHighlight
	set SELECT_FG $SystemHighlightText
	set MENU_BG $NORMAL_BG
	set MENU_FG $NORMAL_FG
	set HIGHLIGHT $SystemWindowFrame
	set TEXT_FG $SystemWindowText
	set TROUGH $NORMAL_BG

	# need to set this explicitly, since its already been created
	. configure -bg $NORMAL_BG

	option add *Button.activeBackground $NORMAL_BG
	option add *Button.activeForeground $NORMAL_FG
	option add *Button.background $NORMAL_BG
	option add *Button.foreground $NORMAL_FG
	option add *Button.highlightBackground $NORMAL_BG
	option add *Button.highlightForeground $NORMAL_FG

	option add *Label.activeBackground $NORMAL_BG
	option add *Label.activeForeground $NORMAL_FG
	option add *Label.background $NORMAL_BG
	option add *Label.foreground $NORMAL_FG
	option add *Label.highlightBackground $NORMAL_BG
	option add *Label.highlightForeground $NORMAL_FG

	option add *Checkbutton.background $NORMAL_BG
	option add *Checkbutton.foreground $NORMAL_FG
	option add *Checkbutton.highlightBackground $NORMAL_BG
	option add *Checkbutton.highlightForeground $NORMAL_FG
	option add *Checkbutton.activeForeground $NORMAL_FG
	option add *Checkbutton.activeBackground $NORMAL_BG

	option add *Radiobutton.background $NORMAL_BG
	option add *Radiobutton.foreground $NORMAL_FG
	option add *Radiobutton.highlightBackground $NORMAL_BG
	option add *Radiobutton.highlightForeground $NORMAL_FG
	option add *Radiobutton.activeForeground $NORMAL_FG
	option add *Radiobutton.activeBackground $NORMAL_BG

	option add *Canvas.background $NORMAL_BG

	option add *Entry.background $SystemWindow
	option add *Entry.foreground $SystemWindowText
	option add *Entry.highlightBackground $NORMAL_BG
	option add *Entry.insertBackground $SystemWindowText
	option add *Entry.selectBackground $SELECT_BG
	option add *Entry.selectForeground $SELECT_FG

	option add *Frame.background $NORMAL_BG
	option add *Frame.highlightBackground $NORMAL_BG
	option add *Frame.highlightForeground $SystemWindowFrame

	option add *Labelframe.foreground $NORMAL_FG
	option add *Labelframe.background $NORMAL_BG

	option add *Listbox.background $SystemWindow
	option add *Listbox.foreground $NORMAL_FG
	option add *Listbox.selectForeground $SELECT_FG
	option add *Listbox.selectBackground $SELECT_BG
	option add *Listbox.highlightBackground $NORMAL_BG
	option add *Listbox.highlightForeground $HIGHLIGHT

	option add *Menu.activeBackground $SELECT_BG
	option add *Menu.activeForeground $SELECT_FG
	option add *Menu.background $MENU_BG
	option add *Menu.foreground $MENU_FG
	option add *Menu.selectForeground $MENU_FG
	
	option add *Menubutton.activeBackground $NORMAL_BG
	option add *Menubutton.activeForeground $NORMAL_FG
	option add *Menubutton.background $NORMAL_BG
	option add *Menubutton.foreground $NORMAL_FG

	option add *Message.background $NORMAL_BG
	option add *Messsage.foreground $NORMAL_FG

	option add *Panedwindow.background $NORMAL_BG

	option add *Scale.activeBackground $NORMAL_BG
	option add *Scale.background $NORMAL_BG
	option add *Scale.foreground $NORMAL_FG
	option add *Scale.troughColor $TROUGH

	option add *Scrollbar.activeBackground $NORMAL_BG
	option add *Scrollbar.background $NORMAL_BG
	option add *Scrollbar.highlightBackground $NORMAL_BG
	option add *Scrollbar.highlightForeground $HIGHLIGHT
	option add *Scale.troughColor $TROUGH

	option add *Text.background $SystemWindow
	option add *Text.foreground $SystemWindowText
	option add *Text.highlightBackground $NORMAL_BG
	option add *Text.highlightForeground $HIGHLIGHT
	option add *Text.insertForeground $TEXT_FG
	option add *Text.selectBackground $SELECT_BG
	option add *Text.selectForeground $SELECT_FG

	option add *Toplevel.background $NORMAL_BG
    }

    if {$::tcl_platform(platform) eq "windows"} {
        option add *Panedwindow.sashRelief flat
        option add *Panedwindow.sashWidth 4
        option add *Panedwindow.sashPad 0
        #option add *Menubutton.activeBackground SystemHighlight
︙︙