Merge branch 'devel' of github.com:Araq/Nimrod into devel

This commit is contained in:
Milos Negovanovic 2014-10-21 15:29:25 +01:00
commit f5cd0a63ad
45 changed files with 1445 additions and 437 deletions

View file

@ -56,6 +56,8 @@ proc addFile*(z: var TZipArchive, dest, src: string) =
## Adds the file `src` to the archive `z` with the name `dest`. `dest`
## may contain a path that will be created.
assert(z.mode != fmRead)
if not fileExists(src):
raise newException(EIO, "File '" & src & "' does not exist")
var zipsrc = zip_source_file(z.w, src, 0, -1)
if zipsrc == nil:
#echo("Dest: " & dest)