From mboxrd@z Thu Jan  1 00:00:00 1970
From: Danny Milosavljevic <dannym@scratchpost.org>
Subject: bug#26353: GuixSD /tmp cleaner fails to clean when Umlauts like
	"=?UTF-8?Q?=C3=A4?=" are used in filenames
Date: Sat, 9 Jun 2018 11:30:20 +0200
Message-ID: <20180609113020.5f30981a@scratchpost.org>
References: <20170403202146.2a9317ce@scratchpost.org> <87poghdbge.fsf@gnu.org>
	<87mvb8f2a7.fsf@gnu.org> <20170423040301.53ea208f@scratchpost.org>
	<87fugo1efp.fsf@gnu.org> <20171214232857.131aa0d6@scratchpost.org>
	<87d13gl1zu.fsf@gnu.org>
Mime-Version: 1.0
Content-Type: text/plain; charset=US-ASCII
Content-Transfer-Encoding: 7bit
Return-path: <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
Received: from eggs.gnu.org ([2001:4830:134:3::10]:52770)
	by lists.gnu.org with esmtp (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1fRaDB-0005l3-LO
	for bug-guix@gnu.org; Sat, 09 Jun 2018 05:31:06 -0400
Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1fRaD8-0001EM-Ij
	for bug-guix@gnu.org; Sat, 09 Jun 2018 05:31:05 -0400
Received: from debbugs.gnu.org ([208.118.235.43]:60644)
	by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16)
	(Exim 4.71) (envelope-from <Debian-debbugs@debbugs.gnu.org>)
	id 1fRaD8-0001E9-EP
	for bug-guix@gnu.org; Sat, 09 Jun 2018 05:31:02 -0400
Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2)
	(envelope-from <Debian-debbugs@debbugs.gnu.org>) id 1fRaD8-0003WV-5Z
	for bug-guix@gnu.org; Sat, 09 Jun 2018 05:31:02 -0400
Sender: "Debbugs-submit" <debbugs-submit-bounces@debbugs.gnu.org>
Resent-Message-ID: <handler.26353.B26353.152853662413495@debbugs.gnu.org>
In-Reply-To: <87d13gl1zu.fsf@gnu.org>
List-Id: Bug reports for GNU Guix <bug-guix.gnu.org>
List-Unsubscribe: <https://lists.gnu.org/mailman/options/bug-guix>,
	<mailto:bug-guix-request@gnu.org?subject=unsubscribe>
List-Archive: <http://lists.gnu.org/archive/html/bug-guix/>
List-Post: <mailto:bug-guix@gnu.org>
List-Help: <mailto:bug-guix-request@gnu.org?subject=help>
List-Subscribe: <https://lists.gnu.org/mailman/listinfo/bug-guix>,
	<mailto:bug-guix-request@gnu.org?subject=subscribe>
Errors-To: bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org
Sender: "bug-Guix" <bug-guix-bounces+gcggb-bug-guix=m.gmane.org@gnu.org>
To: Ludovic =?UTF-8?Q?Court=C3=A8s?= <ludo@gnu.org>
Cc: 26353@debbugs.gnu.org

Hi Ludo,

+(define delete-file*
+  (let ((proc (syscall->procedure int "unlike" '(*))))

Typo.  Should be "unlink".

>+    (lambda* (file #:optional (string->pointer string->pointer/utf-8))
>+      (proc (string->pointer file)))))

>Ideas?

Well, we could always include a special wrapper in guile-static - like we do
for load-linux-module/fd.

That way, it is included in the statically linked guile executable.