filemorph

Check-in [354eefdffb]
Login

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

Overview
Comment:Tweak win images
Timelines: family | ancestors | descendants | both | trunk
Files: files | file ages | folders
SHA1:354eefdffbf9c971f8cb2cfa8edc3288bcd201b7
User & Date: kevin 2015-10-04 02:01:19
Context
2015-10-04
02:32
Update Windows images check-in: 29d9ece758 user: kevin tags: trunk
02:01
Tweak win images check-in: 354eefdffb user: kevin tags: trunk
01:59
Update Windows images check-in: 2f84534154 user: kevin tags: trunk
Changes
Hide Diffs Unified Diffs Ignore Whitespace Patch

Changes to build.bat.

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
del FileMorph.exe
)

call perltidy --pt=2 --bbt=2 --sbt=2 --naws filemorph.pl

call move /y filemorph.pl.tdy filemorph.pl

xcopy scriptlibs C:\Tcl\lib\ /s /i /y

xcopy winlibs C:\Tcl\lib\ /s /i /y

call pp -g -M Encode::Byte -a "iconic_stroke.ttf;script/iconic_stroke.ttf" -l zlib1.dll -l tcl86.dll -l tk86.dll  -a "C:/Tcl;script/Tcl" filemorph.pl -o FileMorph.exe


call "C:\Program Files (x86)\Resource Hacker\ResourceHacker.exe" -delete FileMorph.exe , FileMorph.exe, versioninfo,,

call "C:\Program Files (x86)\Resource Hacker\ResourceHacker.exe" -delete FileMorph.exe , FileMorph.exe, icongroup,,

call windres -i icons.rc  -o icons.res -O res

call windres -i versioninfo.rc -o  versioninfo.res -O res

call "C:\Program Files (x86)\Resource Hacker\ResourceHacker.exe" -add FileMorph.exe , FileMorph.exe , icons.res , ,,

call "C:\Program Files (x86)\Resource Hacker\ResourceHacker.exe" -add FileMorph.exe , FileMorph.exe , versioninfo.res , ,,

call ie4uinit.exe -ClearIconCache







|





<

>











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
del FileMorph.exe
)

call perltidy --pt=2 --bbt=2 --sbt=2 --naws filemorph.pl

call move /y filemorph.pl.tdy filemorph.pl

call xcopy scriptlibs C:\Tcl\lib\ /s /i /y

xcopy winlibs C:\Tcl\lib\ /s /i /y

call pp -g -M Encode::Byte -a "iconic_stroke.ttf;script/iconic_stroke.ttf" -l zlib1.dll -l tcl86.dll -l tk86.dll  -a "C:/Tcl;script/Tcl" filemorph.pl -o FileMorph.exe


call "C:\Program Files (x86)\Resource Hacker\ResourceHacker.exe" -delete FileMorph.exe , FileMorph.exe, versioninfo,,

call "C:\Program Files (x86)\Resource Hacker\ResourceHacker.exe" -delete FileMorph.exe , FileMorph.exe, icongroup,,

call windres -i icons.rc  -o icons.res -O res

call windres -i versioninfo.rc -o  versioninfo.res -O res

call "C:\Program Files (x86)\Resource Hacker\ResourceHacker.exe" -add FileMorph.exe , FileMorph.exe , icons.res , ,,

call "C:\Program Files (x86)\Resource Hacker\ResourceHacker.exe" -add FileMorph.exe , FileMorph.exe , versioninfo.res , ,,

call ie4uinit.exe -ClearIconCache

Changes to scriptlibs/machelp/help.tcl.

116
117
118
119
120
121
122
123
124
125

126


127
128
129
130
131
132
133

proc ::Help::ReadImages {dir} {

    variable library
	
	if {[tk windowingsystem] eq "win32"} {
	 source [file join $library win_images.tcl]
	 return
	 }


    source [file join $library images.tcl]


  	
}


#
# ::Help::AddPage -- Adds another page to the help system
#







<

|
>
|
>
>







116
117
118
119
120
121
122

123
124
125
126
127
128
129
130
131
132
133
134
135

proc ::Help::ReadImages {dir} {

    variable library
	
	if {[tk windowingsystem] eq "win32"} {
	 source [file join $library win_images.tcl]

	 }
	 
	 if {[tk windowingsystem] eq "aqua"} {
	 source [file join $library images.tcl]
	 }

  	
}


#
# ::Help::AddPage -- Adds another page to the help system
#