diff options
| author | 2021-12-17 07:06:30 -0500 | |
|---|---|---|
| committer | 2021-12-17 07:06:30 -0500 | |
| commit | 1fdc150116cad39aae5c5da407c3312b47a59e3a (patch) | |
| tree | 123c79a4d7ad2d45781ba03ce939f7539fb428d8 /Plugins/DbSqliteSystemData/fix_files.tcl | |
| parent | feda8a7db8d1d7c5439aa8f8feef7cc0dd2b59a0 (diff) | |
New upstream version 3.3.3+dfsg1.upstream/3.3.3+dfsg1
Diffstat (limited to 'Plugins/DbSqliteSystemData/fix_files.tcl')
| -rw-r--r-- | Plugins/DbSqliteSystemData/fix_files.tcl | 37 |
1 files changed, 0 insertions, 37 deletions
diff --git a/Plugins/DbSqliteSystemData/fix_files.tcl b/Plugins/DbSqliteSystemData/fix_files.tcl deleted file mode 100644 index d67abd0..0000000 --- a/Plugins/DbSqliteSystemData/fix_files.tcl +++ /dev/null @@ -1,37 +0,0 @@ -#!/usr/bin/env tclsh - -proc process {f} { - set shortName [string map [list systemdata_ ""] $f] - if {[file exists $shortName]} { - file rename -force $shortName $f - } - - set fd [open $f r] - set data [read $fd] - close $fd - - #set data [string map [list systemdata_systemdata_ systemdata_] $data] - set data [string map [list \ - sqlite3 systemdata_sqlite3 \ - ../core/ "" \ - interop.h systemdata_interop.h \ - ../win/crypt.c systemdata_crypt.c \ - ../contrib/extension-functions.c systemdata_extension-functions.c \ - ] $data] - - set fd [open $f w] - puts $fd $data - close $fd -} - -foreach f { - systemdata_sqlite3.c - systemdata_sqlite3.h - systemdata_sqlite3ext.h - systemdata_interop.c - systemdata_interop.h - systemdata_extension-functions.c - systemdata_crypt.c -} { - process $f -} |
