$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
   }