82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
|
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
|
-
+
-
-
-
-
-
+
+
|
$w.t insert end "A graphical frontend to diff\n\n"
$w.t insert end "$::eskil(diffver)\n\n"
$w.t insert end "Made by Peter Spjuth\n"
$w.t insert end "E-Mail: peter.spjuth@gmail.com\n"
$w.t insert end "\nURL: http://eskil.berlios.de\n"
$w.t insert end "\nTcl version: [info patchlevel]\n"
set du [package provide DiffUtil]
set du $::DiffUtil::version
if {[info procs DiffUtil::LocateDiffExe] ne ""} {
append du " (tcl)"
} else {
append du " (c)"
}
|