Peter Bex committed f2ca8d8

Update henrietta-cache so it doesn't get tripped up by Apache's extra newlines

Comments (0)

Files changed (1)


                   (base-uri (update-uri original-uri
                                         path: (if (string=? "" (last path))
-                                                  `(,@path "")))))
-             (download-files-from-list base-uri (cdr lines) cache-dir)))
+                                                  `(,@path ""))))
+                  ;; This works around a strange thing (another one, sigh)
+                  ;; that apache-served stuff causes http-client to see an
+                  ;; extra \r after the end.  Look into this!
+		  (files (delete "" (cdr lines))))
+             (download-files-from-list base-uri files cache-dir)))
        (e (exn http)
           (error (sprintf "Could not download files-list \"~A\" -- ~A\n"
                           uri (get-condition-property e 'exn 'message))))))
Tip: Filter by directory path e.g. /media app.js to search for public/media/app.js.
Tip: Use camelCasing e.g. ProjME to search for
Tip: Filter by extension type e.g. /repo .js to search for all .js files in the /repo directory.
Tip: Separate your search with spaces e.g. /ssh pom.xml to search for src/ssh/pom.xml.
Tip: Use ↑ and ↓ arrow keys to navigate and return to view the file.
Tip: You can also navigate files with Ctrl+j (next) and Ctrl+k (previous) and view the file with Ctrl+o.
Tip: You can also navigate files with Alt+j (next) and Alt+k (previous) and view the file with Alt+o.