Loading src/object-store-http.lisp +1 −1 Original line number Diff line number Diff line Loading @@ -86,7 +86,7 @@ (when (= offset (parse-integer size)) (return-from open-object-stream (make-concatenated-stream))) ;; Server supports range requests! (push (cons :range (format nil "bytes=~D-~D" offset size)) headers))) (push (cons :range (format nil "bytes=~D-~D" offset (1- size))) headers))) (multiple-value-bind (s code) (http-client-request (http-object-store-http-client object-store) uri :additional-headers headers Loading Loading
src/object-store-http.lisp +1 −1 Original line number Diff line number Diff line Loading @@ -86,7 +86,7 @@ (when (= offset (parse-integer size)) (return-from open-object-stream (make-concatenated-stream))) ;; Server supports range requests! (push (cons :range (format nil "bytes=~D-~D" offset size)) headers))) (push (cons :range (format nil "bytes=~D-~D" offset (1- size))) headers))) (multiple-value-bind (s code) (http-client-request (http-object-store-http-client object-store) uri :additional-headers headers Loading