$OpenBSD: patch-demos_listboxtest1_tcl,v 1.1.1.1 2011/01/17 06:51:50 stu Exp $
--- demos/listboxtest1.tcl.orig	Sat Dec  4 16:56:32 2010
+++ demos/listboxtest1.tcl	Sat Dec  4 16:57:33 2010
@@ -17,7 +17,7 @@ wm title . "Listboxtest #1"
 #
 source [file join [file dirname [info script]] option.tcl]
 
-set dirName [file join $tk_library demos images]
+set dirName [file join ${TK_EXA_DIR} images]
 
 #
 # Frame .spacer and listbox .lb