import: nuget: use snake-case.

* guix/import/nuget.scm (nuget-name->guix-name): use snake-case.

Change-Id: I8371d2fd6b33170c61c86302117f7952123e05b5
Reviewed-by: Danny Milosavljevic <dannym@friendly-machines.com>
Signed-off-by: Sharlatan Hellseher <sharlatanus@gmail.com>
This commit is contained in:
Zheng Junjie 2025-06-19 22:37:21 +08:00 committed by Sharlatan Hellseher
parent 6d4d231a57
commit 2e6c177149
No known key found for this signature in database
GPG key ID: 76D727BFF62CD2B5

View file

@ -7,6 +7,7 @@
;;; Copyright © 2021 Simon Tournier <zimon.toutoune@gmail.com>
;;; Copyright © 2022 Hartmut Goebel <h.goebel@crazy-compilers.com>
;;; Copyright © 2025 Danny Milosavljevic <dannym@friendly-machines.com>
;;; Copyright © 2025 Zheng Junjie <z572@z572.online>
;;;
;;; This file is part of GNU Guix.
;;;
@ -49,7 +50,7 @@
#:use-module (guix memoization)
#:use-module (guix utils)
#:use-module ((guix import utils)
#:select (factorize-uri recursive-import flatten))
#:select (factorize-uri snake-case recursive-import flatten))
#:use-module (guix base32)
#:use-module (guix build utils)
#:use-module (guix git)
@ -301,11 +302,7 @@ success, or #f on failure."
'()))))
(define (nuget-name->guix-name name)
(string-downcase (string-append "dotnet-" (string-map (lambda (c)
(if (char=? c #\.)
#\-
c))
name))))
(string-append "dotnet-" (snake-case name)))
(define nuget->guix-package
(memoize