Subject: bug#38781: closed (Re: bug#38781: [PATCH core-updates] build-system/gnu: Make 'first-subdirectory' optional.)

From: [email-masked] (GNU bug Tracking System)
Date: Thu, 19 Oct 2023 12:38:02 +0000

Your bug report

#38781: [PATCH core-updates] build-system/gnu: Make 'first-subdirectory' optional.

which was filed against the guix-patches package, has been closed.

The explanation is attached below, along with your original report.
If you require more details, please reply to [email-masked].

-- 
38781: https://debbugs.gnu.org/cgi/bugreport.cgi?bug=38781
GNU Bug Tracking System
Contact [email-masked] with problems

Subject: Re: bug#38781: [PATCH core-updates] build-system/gnu: Make 'first-subdirectory' optional.
From: Maxim Cournoyer <[email-masked]>
To: Marius Bakke <[email-masked]>
Cc: Danny Milosavljevic <[email-masked]>, [email-masked]
Date: Thu, 19 Oct 2023 08:37:21 -0400
List-Id: <debbugs-submit.debbugs.gnu.org>

Hi,

Marius Bakke <[email-masked]> writes:

> Danny Milosavljevic <[email-masked]> writes:
>
>> * guix/build/gnu-build-system.scm (unpack): Make 'first-subdirectory'
>> optional.
>
> Do you have a use case for this change?

Closing as the use case is not clear.

-- 
Thanks,
Maxim

Subject: [PATCH core-updates] build-system/gnu: Make 'first-subdirectory' optional.
From: Danny Milosavljevic <[email-masked]>
To: [email-masked]
Cc: Danny Milosavljevic <[email-masked]>
Date: Sat, 28 Dec 2019 22:46:22 +0100
List-Id: <debbugs-submit.debbugs.gnu.org>

* guix/build/gnu-build-system.scm (unpack): Make 'first-subdirectory'
optional.
---
 guix/build/gnu-build-system.scm | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/guix/build/gnu-build-system.scm b/guix/build/gnu-build-system.scm
index 4df0bb4904..4ebaa455b0 100644
--- a/guix/build/gnu-build-system.scm
+++ b/guix/build/gnu-build-system.scm
@@ -160,7 +160,7 @@ working directory."
         (if (string-suffix? ".zip" source)
             (invoke "unzip" source)
             (invoke "tar" "xvf" source))
-        (chdir (first-subdirectory "."))))
+        (chdir (or (first-subdirectory ".") "."))))
   #t)
 
 (define %bootstrap-scripts