| Index: installer/emb.vbs | 
| =================================================================== | 
| deleted file mode 100644 | 
| --- a/installer/emb.vbs | 
| +++ /dev/null | 
| @@ -1,40 +0,0 @@ | 
| -' Emb.vbs. | 
| -' Argument(0) is the name of the storage. | 
| -' Argument(1) is the original database. | 
| -' Argument(2) is the path to the transform file. | 
| -' This was changed from the original to work around a gyp defect involved that rewrites whole command lines rather than just path-containing variables. | 
| - | 
| -Option Explicit | 
| - | 
| -' Check arguments | 
| -If WScript.Arguments.Count < 2 Then | 
| - WScript.Echo "Usage is emb.vbs [storage name] [original database] [transform]" | 
| - WScript.Quit(1) | 
| -End If | 
| - | 
| -' Connect to Windows Installer object | 
| -On Error Resume Next | 
| -Dim installer : Set installer = Nothing | 
| -Set installer = Wscript.CreateObject("WindowsInstaller.Installer") | 
| - | 
| -' Evaluate command-line arguments and set open and update modes | 
| -Dim databasePath: databasePath = Wscript.Arguments(1) | 
| -Dim importPath : importPath = Wscript.Arguments(2) | 
| -Dim storageName : storageName = Wscript.Arguments(0) | 
| - | 
| -' Open database and create a view on the _Storages table | 
| -Dim sqlQuery : sqlQuery = "SELECT `Name`,`Data` FROM _Storages" | 
| -Dim database : Set database = installer.OpenDatabase(databasePath, 1) | 
| -Dim view : Set view = database.OpenView(sqlQuery) | 
| - | 
| -'Create and Insert the row. | 
| -Dim record : Set record = installer.CreateRecord(2) | 
| -record.StringData(1) = storageName | 
| -view.Execute record | 
| - | 
| -'Insert storage - copy data into stream | 
| -record.SetStream 2, importPath | 
| -view.Modify 3, record | 
| -database.Commit | 
| -Set view = Nothing | 
| -Set database = Nothing |