$OpenBSD: patch-Coccinella_tcl,v 1.2 2010/07/28 18:03:00 sebastia Exp $
--- Coccinella.tcl.orig	Mon Feb 23 05:47:12 2009
+++ Coccinella.tcl	Sat Aug 29 13:13:35 2009
@@ -131,7 +131,7 @@ if {[string equal $this(platform) "unix"]} {
 } else {
     set thisScript [file normalize [info script]]
 }
-set thisPath [file normalize [file dirname $thisScript]]
+set thisPath ${COCCINELLALIB}
 
 # Debug support.
 source [file join $thisPath lib Debug.tcl]
@@ -148,6 +148,8 @@ source [file join $thisPath lib Init.tcl]
 
 set prefs(appName)    "Coccinella"
 set prefs(theAppName) "Coccinella"
+
+lappend auto_path ${COCCINELLALIB}
 
 # Read our prefs file containing the theme name and locale needed before splash.
 package require PrefUtils