make pool_solvable2str use -<arch> for haiku

diff --git a/src/solvable.c b/src/solvable.c
index 8392f4916a52f6006e8f9c2d511de0d95f74d310..a5baea52e6294801b04c72f463fdef33204cf409 100644 (file)
--- a/src/solvable.c
+++ b/src/solvable.c
@@ -53,7 +53,7 @@ pool_solvable2str(Pool *pool, Solvable *s)
     }
   if (al)
     {
-      p[nl + el] = '.';
+      p[nl + el] = pool->disttype == DISTTYPE_HAIKU ? '-' : '.';
       strcpy(p + nl + el + 1, a);
     }
   return p;