On Sat, 19 Oct 2024 16:08:37 +0200, Kirill A. Korinsky <kir...@korins.ky> wrote: > > On Wed, 09 Oct 2024 06:14:54 +0200, > Timo Myyrä <timo.my...@bittivirhe.fi> wrote: > > > > > > The code looks ok, I haven't tested it. But let's wait a bit to see how > > upstream will handle the issue before patching the port. > > > > Upstream had merged this patch with fixing typos in comments > https://github.com/stumpwm/stumpwm/commit/20d839f2ddfdfd25a8460152bc5dc45a9354e773 > > An updated diff: >
and I had made diff which doesn't applied. Sorry for that. Here an update one: Index: Makefile =================================================================== RCS file: /cvs/ports/x11/stumpwm/Makefile,v retrieving revision 1.23 diff -u -p -r1.23 Makefile --- Makefile 30 Sep 2024 15:12:58 -0000 1.23 +++ Makefile 19 Oct 2024 14:18:26 -0000 @@ -2,7 +2,7 @@ COMMENT= easily hackable Common LISP wi VERSION= 23.11 DISTNAME= stumpwm-${VERSION} -REVISION= 7 +REVISION= 8 CATEGORIES= x11 Index: patches/patch-make-image_lisp_in =================================================================== RCS file: /cvs/ports/x11/stumpwm/patches/patch-make-image_lisp_in,v retrieving revision 1.1 diff -u -p -r1.1 patch-make-image_lisp_in --- patches/patch-make-image_lisp_in 18 Feb 2024 07:46:17 -0000 1.1 +++ patches/patch-make-image_lisp_in 19 Oct 2024 14:18:26 -0000 @@ -7,3 +7,22 @@ Index: make-image.lisp.in (in-package #:cl-user) (let* ((expected-warnings +@@ -48,7 +50,17 @@ + (uiop:symbol-call '#:asdf '#:register-immutable-system system-name))) + + (sb-ext:save-lisp-and-die "stumpwm" :toplevel (lambda () +- ;; asdf requires sbcl_home to be set, so set it to the value when the image was built ++ ;; stumpwm might be built in a fake enviroment, so use uiop:restore-image ++ ;; to compute the real uiop:*user-cache* for that user ++ (uiop:restore-image) ++ ;; and clean the asdf configuration to avoid some cached paths as well ++ (asdf:clear-configuration) ++ (asdf:clear-output-translations) ++ (asdf:initialize-output-translations ++ '(:output-translations ++ :enable-user-cache ++ :ignore-inherited-configuration)) ++ ;; asdf requires SBCL_HOME to be set, so set it to the value when the image was built + (alexandria:when-let ((home #.(sb-ext:posix-getenv "SBCL_HOME"))) + (sb-posix:putenv (format nil "SBCL_HOME=~A" home))) + (stumpwm:stumpwm) -- wbr, Kirill