diff options
| author | 2021-12-17 07:07:47 -0500 | |
|---|---|---|
| committer | 2021-12-17 07:07:47 -0500 | |
| commit | 558b1e35fd0777ac97763c1b28056ac984e583e7 (patch) | |
| tree | 1eb2557119a117ea76535c89cd14a49e510b96bf /Plugins/DbSqliteSystemData/fix_files.tcl | |
| parent | c22eb635c11fd45f9c30f911d70e1d79111a49ce (diff) | |
| parent | 1fdc150116cad39aae5c5da407c3312b47a59e3a (diff) | |
Update upstream source from tag 'upstream/3.3.3+dfsg1'
Update to upstream version '3.3.3+dfsg1'
with Debian dir 9a301fff4922aed2fec0c04c7d011947168c42f1
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 -} |
