Adjust for OpenBSD-specific Tcl package path layout. Index: tcl/init.tcl --- tcl/init.tcl.orig +++ tcl/init.tcl @@ -30,10 +30,24 @@ # # Make packages in that directory available -eval lappend auto_path $eltcl_pkgPath +set na {} +foreach p $auto_path { + lappend na [file normalize $p] +} +foreach p $eltcl_pkgPath { + if {[set np [file normalize $p]] ni $na} { + lappend auto_path $p + lappend na $np + } +} if { [info exists env(ELTCLLIBPATH)] } { - eval lappend auto_path $env(ELTCLLIBPATH) + foreach p $env(ELTCLLIBPATH) { + if {[file normalize $p] ni $na} { + lappend auto_path $p + } + } } +unset na p np # Install default signal handlers (if the signal command exists) if { [info command signal] != "" } { namespace eval el {