From 84dfe46ce522d73d9da911e2102686ad557967d4 Mon Sep 17 00:00:00 2001
From: Enno Rehling <enno.rehling@gmail.com>
Date: Fri, 3 Jan 2020 20:21:14 +0100
Subject: [PATCH] Revert "bug 2625 samen werden direkt zu schoesslingen"

This reverts commit 4f88bf137edf33de4f56d8c81f5789bfedfe058f.
---
 src/economy.c | 10 +++++-----
 1 file changed, 5 insertions(+), 5 deletions(-)

diff --git a/src/economy.c b/src/economy.c
index 5da191e50..35e08ade6 100644
--- a/src/economy.c
+++ b/src/economy.c
@@ -1775,12 +1775,12 @@ static void breedtrees(unit * u, int raw)
     }
     if (n > raw) n = raw;
 
-    /* Talent * 5% der Samen setzen an (max 100%) */
-    planted = n;
-    if (skill < 20) {
-        planted = planted * skill / 20;
+    /* Fuer jeden Samen Talent*5% Erfolgschance. */
+    for (i = n; i > 0; i--) {
+        if (rng_int() % 100 < skill * 5)
+            planted++;
     }
-    rsettrees(r, 0, rtrees(r, 0) + planted);
+    rsettrees(r, 1, rtrees(r, 1) + planted);
 
     /* Alles ok. Abziehen. */
     produceexp(u, SK_HERBALISM, u->number);