diff options
author | dan miller | 2007-10-21 08:36:32 +0000 |
---|---|---|
committer | dan miller | 2007-10-21 08:36:32 +0000 |
commit | 2f8d7092bc2c9609fa98d6888106b96f38b22828 (patch) | |
tree | da6c37579258cc965b52a75aee6135fe44237698 /libraries/sqlite/unix/sqlite-3.5.1/tclinstaller.tcl | |
parent | * Committing new PolicyManager based on an ACL system. (diff) | |
download | opensim-SC-2f8d7092bc2c9609fa98d6888106b96f38b22828.zip opensim-SC-2f8d7092bc2c9609fa98d6888106b96f38b22828.tar.gz opensim-SC-2f8d7092bc2c9609fa98d6888106b96f38b22828.tar.bz2 opensim-SC-2f8d7092bc2c9609fa98d6888106b96f38b22828.tar.xz |
libraries moved to opensim-libs, a new repository
Diffstat (limited to 'libraries/sqlite/unix/sqlite-3.5.1/tclinstaller.tcl')
-rw-r--r-- | libraries/sqlite/unix/sqlite-3.5.1/tclinstaller.tcl | 32 |
1 files changed, 0 insertions, 32 deletions
diff --git a/libraries/sqlite/unix/sqlite-3.5.1/tclinstaller.tcl b/libraries/sqlite/unix/sqlite-3.5.1/tclinstaller.tcl deleted file mode 100644 index 29d343e..0000000 --- a/libraries/sqlite/unix/sqlite-3.5.1/tclinstaller.tcl +++ /dev/null | |||
@@ -1,32 +0,0 @@ | |||
1 | # This script attempts to install SQLite3 so that it can be used | ||
2 | # by TCL. Invoke this script with single argument which is the | ||
3 | # version number of SQLite. Example: | ||
4 | # | ||
5 | # tclsh tclinstaller.tcl 3.0 | ||
6 | # | ||
7 | set VERSION [lindex $argv 0] | ||
8 | set LIBFILE .libs/libtclsqlite3[info sharedlibextension] | ||
9 | if { ![info exists env(DESTDIR)] } { set env(DESTDIR) "" } | ||
10 | if { ![info exists env(TCLLIBDIR)] } { set env(TCLLIBDIR) [lindex $auto_path 0] } | ||
11 | set LIBDIR $env(DESTDIR)$env(TCLLIBDIR) | ||
12 | set LIBDIR_INSTALL $env(TCLLIBDIR) | ||
13 | set LIBNAME [file tail $LIBFILE] | ||
14 | set LIB $LIBDIR/sqlite3/$LIBNAME | ||
15 | set LIB_INSTALL $LIBDIR_INSTALL/sqlite3/$LIBNAME | ||
16 | |||
17 | file delete -force $LIBDIR/sqlite3 | ||
18 | file mkdir $LIBDIR/sqlite3 | ||
19 | set fd [open $LIBDIR/sqlite3/pkgIndex.tcl w] | ||
20 | puts $fd "package ifneeded sqlite3 $VERSION \[list load $LIB_INSTALL sqlite3\]" | ||
21 | close $fd | ||
22 | |||
23 | # We cannot use [file copy] because that will just make a copy of | ||
24 | # a symbolic link. We have to open and copy the file for ourselves. | ||
25 | # | ||
26 | set in [open $LIBFILE] | ||
27 | fconfigure $in -translation binary | ||
28 | set out [open $LIB w] | ||
29 | fconfigure $out -translation binary | ||
30 | puts -nonewline $out [read $in] | ||
31 | close $in | ||
32 | close $out | ||