From 3222b1469de38d7d2bcc40f6087b0ca9c508acc3 Mon Sep 17 00:00:00 2001
From: Yann Dupont <yann.dupont@univ-nantes.fr>
Date: Mon, 28 Feb 2022 15:12:24 +0100
Subject: [PATCH] new-version of latest-version

---
 glicid/utils.scm | 11 ++++++++++-
 1 file changed, 10 insertions(+), 1 deletion(-)

diff --git a/glicid/utils.scm b/glicid/utils.scm
index ae1b244..d7f4ee0 100644
--- a/glicid/utils.scm
+++ b/glicid/utils.scm
@@ -10,7 +10,16 @@
   #:export (transform-package)
   #:export (instead-of)
 )
-(define (latest-version v1 v2) (if (string> (package-version v1) (package-version v2)) v1 v2))
+;(define (latest-version v1 v2) (if (string> (package-version v1) (package-version v2)) v1 v2))
+
+(define (latest-version v1 v2)
+
+ (case (version-compare (package-version v1) (package-version v2))
+                            ((>) (v1))
+                            ((=) (v1))
+                            ((<) (v2))
+ )
+)
 
 (define gcc11-instead-of-gcc
   (package-input-rewriting `(