master: Don't lose :character-set when changing pathname case

stassats via Sbcl-commits <[email protected]>
Newsgroups gmane.lisp.steel-bank.cvs
Message-ID <[email protected]>
The branch "master" has been updated in SBCL:
       via  61143f7eeb2fd3432e71069abced05f77885c426 (commit)
      from  e071985c6e399cf01b75c096c9b8d73f15188053 (commit)

- Log -----------------------------------------------------------------
commit 61143f7eeb2fd3432e71069abced05f77885c426
Author: Stas Boukarev <[email protected]>
Date:   Thu Apr 16 03:30:10 2026 +0300

    Don't lose :character-set when changing pathname case
---
 src/code/target-pathname.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/src/code/target-pathname.lisp b/src/code/target-pathname.lisp
index 510067d43..bf8da9a58 100644
--- a/src/code/target-pathname.lisp
+++ b/src/code/target-pathname.lisp
@@ -739,7 +739,7 @@ the operating system native pathname conventions."
                              (simple-string
                               (funcall fun piece))
                              ((cons (eql :character-set))
-                              (funcall fun (cdr piece)))
+                              (cons :character-set (funcall fun (cdr piece))))
                              (t
                               piece)))
                          (pattern-pieces thing))))

-----------------------------------------------------------------------


hooks/post-receive
-- 
SBCL
lmpx.com only provides a reader for public news (NNTP) servers. It is not affiliated with the servers or forums shown here and is not responsible for the content of articles, which is written by their respective authors.