Changeset 11707 in project


Ignore:
Timestamp:
08/22/08 11:00:59 (11 years ago)
Author:
felix winkelmann
Message:

fix in debug output

File:
1 edited

Legend:

Unmodified
Added
Removed
  • chicken/branches/hygienic/setup-download.scm

    r11705 r11707  
    172172                   (error "invalid file name - possibly corrupt transmission" name))
    173173                  ((string-suffix? "/" name)
    174                    (d "  " name)
     174                   (d "  ~a~%" name)
    175175                   (create-directory (make-pathname dest name))
    176176                   (loop files))
    177177                  (else
    178                    (d "  " name)
     178                   (d "  ~a~%" name)
    179179                   (let* ((size (read in))
    180180                          (_ (read-line in))
Note: See TracChangeset for help on using the changeset viewer.