diff options
Diffstat (limited to 'development/tclvfs/patches/05-pkgindex.patch')
| -rw-r--r-- | development/tclvfs/patches/05-pkgindex.patch | 28 |
1 files changed, 28 insertions, 0 deletions
diff --git a/development/tclvfs/patches/05-pkgindex.patch b/development/tclvfs/patches/05-pkgindex.patch new file mode 100644 index 0000000000..77bb689caa --- /dev/null +++ b/development/tclvfs/patches/05-pkgindex.patch @@ -0,0 +1,28 @@ +Debian-specific patch by Sergei Golovan which replaces current directory +for tclvfs library by a fixed one. + +--- tclvfs-1.3-20080503.orig/pkgIndex.tcl.in ++++ tclvfs-1.3-20080503/pkgIndex.tcl.in +@@ -12,19 +12,18 @@ + package require Tcl 8.4 + + namespace eval ::vfs {} +-variable vfs::dll [file join $dir @PKG_LIB_FILE@] ++variable vfs::dll [file join /usr/lib @PACKAGE_NAME@@PACKAGE_VERSION@ @PKG_LIB_FILE@] + +-proc loadvfs {dll} { ++proc loadvfs {dir dll} { + global auto_path + if {![file exists $dll]} { return } +- set dir [file dirname $dll] + if {[lsearch -exact $auto_path $dir] == -1} { + lappend auto_path $dir + } + load $dll + } + +-package ifneeded vfs @PACKAGE_VERSION@ [list loadvfs $vfs::dll] ++package ifneeded vfs @PACKAGE_VERSION@ [list loadvfs $dir $vfs::dll] + + # Allow optional redirect of VFS_LIBRARY components. Only necessary + # for testing, but could be used elsewhere. |