![]() ![]() | ![]() |
File: [local] / ports / cad / tkgate / patches / Attic / patch-scripts_license_tcl (download)
Revision 1.1.1.1 (vendor branch), Mon Nov 10 13:11:23 2008 UTC (15 years, 9 months ago) by yason
re-import |
$OpenBSD$ --- scripts/license.tcl.orig Fri Jan 4 23:17:27 2008 +++ scripts/license.tcl Fri Jan 4 23:17:43 2008 @@ -44,7 +44,7 @@ proc showDocFile {label file L} { } if { $file != "" } { - set f [open $tkg_gateHome/doc/$file] + set f [open $tkg_gateHome/$file] $w.text insert end [read $f] close $f }