Ignore:
Timestamp:
06/10/11 10:12:24 (10 years ago)
Author:
Mark Evenson
Message:

Use TRUENAME when determining name for hierarchial zip archives.

Fixes the three arg SYSTEM:ZIP under OSX.

File:
1 edited

Legend:

Unmodified
Added
Removed
  • trunk/abcl/src/org/armedbear/lisp/zip.java

    r13320 r13321  
    107107            ZipOutputStream out =
    108108                new ZipOutputStream(new FileOutputStream(zipfileNamestring));
    109             Pathname root = (Pathname)coerceToPathname(third);
     109            Pathname root = (Pathname) Pathname.truename(coerceToPathname(third));
    110110            String rootPath = root.getDirectoryNamestring();
    111111            int rootPathLength = rootPath.length();
     
    113113            LispObject list = second;
    114114            while (list != NIL) {
    115                 Pathname pathname = coerceToPathname(list.car());
     115                Pathname pathname = (Pathname) Pathname.truename(coerceToPathname(list.car()));
    116116                String namestring = pathname.getNamestring();
    117117                if (namestring == null) {
Note: See TracChangeset for help on using the changeset viewer.