Ver código fonte

[fixed] error in logic about which embryo is about to be born which caused pregnancies after first to fail registering their believed fathers.

maankamara 1 ano atrás
pai
commit
785ce6b349
1 arquivos alterados com 1 adições e 1 exclusões
  1. 1 1
      locations/femcyc.qsrc

+ 1 - 1
locations/femcyc.qsrc

@@ -899,7 +899,7 @@ if $ARGS[0] = 'preg':
 		if lactation['active'] < 1: func('lact_lib','lact_switch')
 		$cycreport_txt = 'In labour'
 		arrmodtmp = arrsize('$ChildFath')
-		arrmodtmp -= (babyembryo+1)
+		arrmodtmp -= (babyembryo)
 		:babyfinalpreploop
 		if arrmodtmp < arrsize('$ChildFath') and daykid[arrmodtmp] = 0:
 			daykid[arrmodtmp] = 42