From cd301f3a86e15de48d122b112c1f16fa5b316e3f Mon Sep 17 00:00:00 2001 From: Peter Bex Date: Wed, 23 Feb 2022 08:31:58 +0100 Subject: Drop redundant stripping of directory name when sending files As pointed out by Siiky, intarweb already strips the directory name, so we don't have to do it here. Allows us to drop an import, which is always nice for clarity. Also update the copyright year. --- http-client.scm | 5 +---- 1 file changed, 1 insertion(+), 4 deletions(-) diff --git a/http-client.scm b/http-client.scm index 5d33835..1eef99d 100644 --- a/http-client.scm +++ b/http-client.scm @@ -1,7 +1,7 @@ ;;; ;;; Convenient HTTP client library ;;; -;; Copyright (c) 2008-2021, Peter Bex +;; Copyright (c) 2008-2022, Peter Bex ;; Parts copyright (c) 2000-2004, Felix L. Winkelmann ;; All rights reserved. ;; @@ -52,7 +52,6 @@ (chicken sort) (chicken io) (chicken file posix) (chicken format) (chicken process-context) (chicken process-context posix) (chicken port) (chicken file) (chicken tcp) (chicken condition) - (chicken pathname) intarweb uri-common simple-md5 sendfile) ;; Major TODOs: @@ -720,8 +719,6 @@ (filename (or (kv-ref keys filename:) (and (port? file) (port-name file)) (and (string? file) file))) - (filename (and filename - (pathname-strip-directory filename))) (h (headers `((content-disposition #(form-data ((name . ,(car entry)) (filename . ,filename)))) -- cgit v1.2.3