diff options
author | sterni <sternenseemann@systemli.org> | 2024-12-02T22·19+0100 |
---|---|---|
committer | clbot <clbot@tvl.fyi> | 2024-12-02T23·09+0000 |
commit | 302297cfe3f475a826a020433c3243ae82b1070a (patch) | |
tree | 6b2b99a7d20337132d7adf7cfd0c796bf667ed73 | |
parent | 743d54a758bff32be07d436728cf1ef8c2b74675 (diff) |
fix(3p/lisp/mime4cl): fix stat function name in FILE-SIZE r/8978
This is a silly mistake and was not caught because FILE-SIZE isn't exercised in the test suite. We can probably remove MIME-BODY-SIZE and look into removing MIME-PART-SIZE as well. I just want to be thorough here so that we can revert into a non-broken state in case we decide we need those functions for something. Change-Id: I5bbb3dde6616220fc3b6feddbf7a39b6a9b0ea0d Reviewed-on: https://cl.tvl.fyi/c/depot/+/12861 Autosubmit: sterni <sternenseemann@systemli.org> Reviewed-by: sterni <sternenseemann@systemli.org> Tested-by: BuildkiteCI
-rw-r--r-- | third_party/lisp/mime4cl/ex-sclf.lisp | 3 |
1 files changed, 1 insertions, 2 deletions
diff --git a/third_party/lisp/mime4cl/ex-sclf.lisp b/third_party/lisp/mime4cl/ex-sclf.lisp index 19b3fa0860ab..bf5b157d167d 100644 --- a/third_party/lisp/mime4cl/ex-sclf.lisp +++ b/third_party/lisp/mime4cl/ex-sclf.lisp @@ -32,7 +32,6 @@ (defpackage :mime4cl-ex-sclf (:use :common-lisp) - (:import-from :sb-posix :stat :stat-size) (:export #:aif @@ -274,7 +273,7 @@ ELEMENT-TYPE." ;; allows to get to know the file size without being able to open a ;; file; just ask politely. (defun file-size (pathname) - #+sbcl (stat-size (unix-stat pathname)) + #+sbcl (sb-posix:stat-size (sb-posix:stat pathname)) #-sbcl (error "nyi")) ;; LAZY |