Changeset 57510 in spip-zone

Timestamp:

Jan 22, 2012, 2:36:19 PM (8 years ago)

Author:

eric@…

Message:

Corrections des fonctions de normalisation et dénormalisation de la version d'un paquet.

Location:

_core_/plugins/svp

Files:

• inc/svp_outiller.php (modified) (1 diff)
• paquet.xml (modified) (1 diff)
• svp_fonctions.php (modified) (1 diff)

_core_/plugins/svp/inc/svp_outiller.php

@@ -316 +316 @@
 
         $version_normalisee = '';
-        if ($version) {
-                $v = explode('.', $version);
-                foreach($v as $_nombre) {
-                        $vn[] = str_pad($_nombre, 3, '0', STR_PAD_LEFT);
-                }
-                $version_normalisee = implode('.', $vn);
-        }
+
+        if (preg_match(',([0-9.]+)[\s-.]?(dev|alpha|a|beta|b|rc|pl|p)?,i', $version, $matches)) {
+                if ($matches[1]) {
+                        $v = explode('.', $matches[1]);
+                        foreach($v as $_nombre) {
+                                $vn[] = str_pad($_nombre, 3, '0', STR_PAD_LEFT);
+                        }
+                        $version_normalisee = implode('.', $vn);
+                        if ($matches[2])
+                                $version_normalisee =  $version_normalisee . '-' . $matches[2];
+                }
+        }
+
         return $version_normalisee;
 }

_core_/plugins/svp/paquet.xml

@@ -2 +2 @@
         prefix="svp"
         categorie="maintenance"
-        version="0.75.1"
+        version="0.75.2"
         etat="test"
         compatibilite="[3.0.0-beta;3.0.*]"

_core_/plugins/svp/svp_fonctions.php

@@ -426 +426 @@
                 foreach($v as $_nombre) {
                         $n = ltrim($_nombre, '0');
-                        $vn[] = (strlen($n)>0) ? $n : '0';
+                        // On traite les cas du type 001.002.000-dev qui doivent etre transformes en 1.2.0-dev.
+                        // Etant donne que la denormalisation est toujours effectuee sur une version normalisee on sait
+                        // que le suffixe commence toujours pas '-'
+                        $vn[] = ((strlen($n)>0) AND substr($n, 0, 1)!='-' ) ? $n : "0$n";
                 }
                 $version = implode('.', $vn);