about summary refs log tree commit diff
diff options
context:
space:
mode:
authorsterni <sternenseemann@systemli.org>2024-12-02T22·19+0100
committerclbot <clbot@tvl.fyi>2024-12-02T23·09+0000
commit302297cfe3f475a826a020433c3243ae82b1070a (patch)
tree6b2b99a7d20337132d7adf7cfd0c796bf667ed73
parent743d54a758bff32be07d436728cf1ef8c2b74675 (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.lisp3
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