From 5c4cd434a6f96766316c31acae385808fa115b43 Mon Sep 17 00:00:00 2001
From: Pregmodder <pregmodder@gmail.com>
Date: Tue, 16 Oct 2018 00:37:43 -0400
Subject: [PATCH] fixes

---
 devNotes/VersionChangeLog-Premod+LoliMod.txt | 5 +++++
 src/init/setupVars.tw                        | 2 +-
 src/init/storyInit.tw                        | 2 +-
 src/uncategorized/BackwardsCompatibility.tw  | 7 +++++--
 src/uncategorized/reNickname.tw              | 2 +-
 src/uncategorized/saLongTermEffects.tw       | 4 +++-
 6 files changed, 16 insertions(+), 6 deletions(-)

diff --git a/devNotes/VersionChangeLog-Premod+LoliMod.txt b/devNotes/VersionChangeLog-Premod+LoliMod.txt
index e5e5582574b..2a28469b46a 100644
--- a/devNotes/VersionChangeLog-Premod+LoliMod.txt
+++ b/devNotes/VersionChangeLog-Premod+LoliMod.txt
@@ -2,6 +2,11 @@
 
 0.10.7.1-0.10.x
 
+10/16/2018
+
+	19
+	-fixes
+
 10/15/2018
 
 	18
diff --git a/src/init/setupVars.tw b/src/init/setupVars.tw
index b6b4c897338..6ed2c731f7d 100644
--- a/src/init/setupVars.tw
+++ b/src/init/setupVars.tw
@@ -659,7 +659,7 @@
 <<set setup.serbianMaleNames = []>>
 <<set setup.serbianSlaveSurnames = ["Aćimović", "Adamović", "Aleksić", "Amidžić", "Andelković", "Anđelković", "Andrić", "Antić", "Antonijević", "Arsenijević", "Arsić", "Avramović", "Azirović", "Babić", "Bajić", "Blagojević", "Bogdanović", "Bojović", "Bošković", "Božić", "Božović", "Branković", "Brkić", "Brnabić", "Čihorić", "Cirić", "Ćirić", "Ćirković", "Čolić", "Ćosić", "Crnokrak", "Ćurčić", "Cvetanović", "Cvetković", "Damnjanović", "Davidović", "Dejanović", "Despotović", "Dimić", "Dimitrijević", "Dimitrovska", "Dinić", "Djordjević", "Dokić", "Đokić", "Dordević", "Đorđević", "Dragićević", "Đukić", "Durdević", "Đurđević", "Durić", "Đurić", "Đurović", "Filipović", "Gajić", "Gavrilović", "Glišić", "Golubović", "Grbić", "Grujić", "Gvozdić", "Horvat", "Ignjatović", "Ilić", "Ivanišević", "Ivanović", "Ivaonović", "Ivković", "Jakovljević", "Jakšić", "Janjić", "Janković", "Jelić", "Jeremić", "Jevtić", "Jocić", "Jokić", "Joksimović", "Jovanović", "Jovanovski", "Jović", "Jovičić", "Karan", "Karleuša", "Kiš", "Kmezić", "Knežević", "Kocić", "Kojić", "Kostadinović", "Kostić", "Kovać", "Kovač", "Kovacević", "Kovačević", "Krsmanović", "Krstić", "Kukrić", "Kuzmanović", "Latinović", "Lavić", "Lazarević", "Lazić", "Lazović", "Lekić", "Lukić", "Luković", "Maksimović", "Mandić", "Manojlović", "Marić", "Marinković", "Marjanović", "Marković", "Matić", "Mićić", "Mihailović", "Mihajlović", "Mijačević", "Mijailović", "Mijatović", "Miladinović", "Milanović", "Milenković", "Miletić", "Milić", "Milićević", "Milivojević", "Miljković", "Milojević", "Milojković", "Milosavljević", "Milosević", "Milošević", "Milovanović", "Milutinović", "Mirković", "Mišić", "Mitić", "Mitrović", "Mladenović", "Mrkić", "Nad", "Nađ", "Nedeljković", "Nesić", "Nešić", "Nešković", "Nikolić", "Novaković", "Obradović", "Ostojić", "Pajić", "Panić", "Pantelić", "Pantić", "Paunović", "Pavlović", "Pejčić", "Perić", "Perišić", "Perović", "Pešić", "Petić", "Petković", "Petrović", "Popov", "Popović", "Radenković", "Radić", "Radivojević", "Radojević", "Radojičić", "Radojković", "Radosavljević", "Radovanović", "Radović", "Radulović", "Rajić", "Rajković", "Rakić", "Ranđelović", "Ranković", "Ražnatović", "Redžepova", "Ristić", "Savić", "Sekulić", "Seničar", "Simić", "Simonović", "Spasić", "Spasojević", "Stamenković", "Stanić", "Stanković", "Stanojević", "Stefanović", "Stevanović", "Stojanović", "Stojiljković", "Stojković", "Stošić", "Tadić", "Tanasković", "Tasić", "Tatalović", "Terzić", "Tešić", "Todorović", "Tomašević", "Tomić", "Topalović", "Tošić", "Tot", "Tozić", "Trajković", "Trifunović", "Tržan", "Urošević", "Varga", "Vasić", "Vasiljević", "Veličković", "Veljković", "Veselinović", "Vojinović", "Vučelić", "Vučković", "Vujić", "Vujović", "Vukadinović", "Vuković", "Zarić", "Zdravković", "Živanović", "Zivković", "Živković", "Zorić"]>>
 
-<<set setup.australianSlaveNames = ["Abbey", "Abbie", "Abigail", "Adelaide", "Aisha", "Alexandra", "Alice", "Alycia", "Alyssa", "Amanda", "Amelia", "Amethyst", "Anna", "Annabelle", "Annaleise", "Anne", "Anneliisa", "Anthea", "Aurelia", "Ava", "Avril", "Bambi", "Bella", "Brdiget", "Brittni", "Brody", "Brooke", "Caitlin", "Caitlyn", "Camille", "Cassandra", "Cassi", "Cassie", "Catherine", "Charlotte", "Chloe", "Claire", "Clare", "Codie", "Delta", "Elise", "Ella", "Ellie", "Elodie", "Elouise", "Elyse", "Emilie", "Emily", "Erin", "Eva", "Evelyn", "Gabriella", "Gemma", "Georgie", "Georgina", "Grace", "Hanna", "Hannah", "Harper", "Holly", "Iggy", "Imogen", "Indiana", "Isabel", "Isabella", "Isabelle", "Isla", "Jade", "Jan", "Janelle", "Jennifer", "Jesinta", "Jess", "Jessica", "Jessie", "Joanne", "Julia", "Juliana", "Kahili", "Kate", "Kath", "Kim", "Kimberley", "Krystal", "Kylie", "Lara", "Laura", "Lauren", "Layla", "Lenka", "Lily", "Lisa", "Louise", "Lucy", "Lydia", "Maddison", "Madeleine", "Maia", "Margot", "Matilda", "Maxine", "May", "Maya", "Megan", "Mia", "Michelle", "Mila", "Miranda", "Morgan", "Narelle", "Nathalie", "Nicky", "Nicole", "Nikki", "Olivia", "Paige", "Pania", "Phoebe", "Poppy", "Portia", "Quentin", "Rachael", "Rachel", "Radha", "Rebecca", "Rekha", "Renae", "Robyn", "Rose", "Rosie", "Ruby", "Ruth", "Sara", "Sarah", "Sarita", "Scarlett", "Shanina", "Sheila", "Sienna", "Simone", "Siobhan", "Skye", "Sofia", "Sophia", "Sophie", "Stephanie", "Tabrett", "Tahlia", "Tal", "Tallulah", "Tasha", "Tegan", "Teresa", "Tiah", "Vanessa", "Victoria", "Violet", "Viva", "Yvonne", "Zoe"]>>
+<<set setup.australianSlaveNames = ["Abbey", "Abbie", "Abigail", "Adelaide", "Aisha", "Alexandra", "Alice", "Alycia", "Alyssa", "Amanda", "Amelia", "Amethyst", "Anna", "Annabelle", "Annaleise", "Anne", "Anneliisa", "Anthea", "Aurelia", "Ava", "Avril", "Bambi", "Bella", "Bridget", "Brittni", "Brody", "Brooke", "Caitlin", "Caitlyn", "Camille", "Cassandra", "Cassi", "Cassie", "Catherine", "Charlotte", "Chloe", "Claire", "Clare", "Codie", "Delta", "Elise", "Ella", "Ellie", "Elodie", "Elouise", "Elyse", "Emilie", "Emily", "Erin", "Eva", "Evelyn", "Gabriella", "Gemma", "Georgie", "Georgina", "Grace", "Hanna", "Hannah", "Harper", "Holly", "Iggy", "Imogen", "Indiana", "Isabel", "Isabella", "Isabelle", "Isla", "Jade", "Jan", "Janelle", "Jennifer", "Jesinta", "Jess", "Jessica", "Jessie", "Joanne", "Julia", "Juliana", "Kahili", "Kate", "Kath", "Kim", "Kimberley", "Krystal", "Kylie", "Lara", "Laura", "Lauren", "Layla", "Lenka", "Lily", "Lisa", "Louise", "Lucy", "Lydia", "Maddison", "Madeleine", "Maia", "Margot", "Matilda", "Maxine", "May", "Maya", "Megan", "Mia", "Michelle", "Mila", "Miranda", "Morgan", "Narelle", "Nathalie", "Nicky", "Nicole", "Nikki", "Olivia", "Paige", "Pania", "Phoebe", "Poppy", "Portia", "Quentin", "Rachael", "Rachel", "Radha", "Rebecca", "Rekha", "Renae", "Robyn", "Rose", "Rosie", "Ruby", "Ruth", "Sara", "Sarah", "Sarita", "Scarlett", "Shanina", "Sheila", "Sienna", "Simone", "Siobhan", "Skye", "Sofia", "Sophia", "Sophie", "Stephanie", "Tabrett", "Tahlia", "Tal", "Tallulah", "Tasha", "Tegan", "Teresa", "Tiah", "Vanessa", "Victoria", "Violet", "Viva", "Yvonne", "Zoe"]>>
 <<set setup.australianMaleNames = []>>
 <<set setup.australianSlaveSurnames = ["Abbott", "Adams", "Alexander", "Allen", "Anderson", "Andrews", "Armstrong", "Ayris", "Azalea", "Bailey", "Baker", "Barker", "Barnes", "Barrett", "Bayet", "Bell", "Bennett", "Bethell", "Bianca", "Bingle", "Black", "Blundell", "Blyth", "Bowen", "Boyd", "Breeds", "Brisley", "Brooks", "Brown", "Browning", "Bryce", "Burdeu", "Burgess", "Burke", "Burns", "Burr", "Butcher", "Butler", "Byrne", "Cameron", "Campbell", "Carey", "Carroll", "Carter", "Cazzulimi", "Chan", "Chapman", "Chen", "Cherry", "Cheyenne", "Cilmi", "Clark", "Clarke", "Clemens", "Cole", "Coleman", "Collins", "Cook", "Cooke", "Cooper", "Cornish", "Cox", "Crawford", "Cribbon", "Curtis", "Dalle", "Davidson", "Davies", "Davis", "Dawson", "Day", "de Gouw", "De Gouw", "de Ravin", "de Rossi", "Dean", "Debnam", "Dee", "Dixon", "Douglas", "Doyle", "Duncan", "Dundee", "Dundovic", "Dunn", "Eckhardt", "Edwards", "Elliott", "Ellis", "Englert", "Evans", "Evers", "Ferguson", "Fisher", "Fitzgerald", "Fletcher", "Folino", "Ford", "Forge", "Forscutt", "Foster", "Fox", "Francis", "Fraser", "Freeman", "Gale", "Gardner", "George", "Getheridge-Giumelli", "Getheridge", "Gibson", "Gill", "Gillard", "Giumelli", "Gleave", "Gliwski", "Gold", "Gomes", "Gonsalves", "Goodrem", "Gordon", "Graham", "Grant", "Gray", "Green", "Griffin", "Griffiths", "Haig", "Hall", "Hamilton", "Harris", "Harrison", "Hart", "Harvey", "Hawkins", "Hayes", "Heathcote", "Henderson", "Hill", "Holmes", "Holt", "Howard", "Hughes", "Hunt", "Hunter", "Irwin", "Jackson", "Jacobsen", "James", "Jenkins", "Jenneke", "Johnson", "Johnston", "Jones", "Kane", "Kelley", "Kelly", "Kennedy", "Kerr", "Kershaw", "Kim", "King", "Knight", "Kripac", "Lane", "Lawley", "Lawrence", "Lee", "Lewis", "Li", "Lim", "Liu", "Lloyd", "Lowe", "Lucas", "Luther", "Lynch", "MacDonald", "MacKenzie", "Malcolm", "Mangan", "Marais", "Marshall", "Martin", "Mason", "Matthews", "May", "McCarthy", "McDonald", "McKenzie", "McLean", "McMahon", "McNamee", "McNaught", "McNeil", "Miller", "Mills", "Mitchell", "Moore", "Morgan", "Morris", "Morrison", "Morton", "Mundy", "Murphy", "Murray", "Neiberding", "Nelson", "Newman", "Nguyen", "Nobis", "Northwood", "O'Brien", "O'Connor", "O'Neill", "Oman", "Origliasso", "Page", "Palmer", "Parekh", "Parker", "Patel", "Paterson", "Payne", "Pearce", "Pearson", "Perry", "Peters", "Phillips", "Piazza", "Porter", "Powell", "Price", "Ravin", "Reid", "Reynolds", "Richards", "Richardson", "Rippon", "Robbie", "Roberts", "Robertson", "Robinson", "Rockatansky", "Rogers", "Rose", "Ross", "Rowe", "Russell", "Ryan", "Sanderson", "Saunders", "Scott", "Sears", "Seiffert", "Shaik", "Shaw", "Simpson", "Singh", "Smith", "Spencer", "Stasey", "Stella", "Stephens", "Stevens", "Stewart", "Stone", "Strachan", "Stracke", "Strahovski", "Sullivan", "Sutherland", "Tan", "Taylor", "Thomas", "Thompson", "Thomson", "Tonisson", "Tonkin", "Torv", "Tozzi", "Tran", "Trunfio", "Tupper", "Turner", "Twigley", "Valance", "van den Dungen", "Van Den Dungen", "Vickers", "Visser", "Walker", "Wallace", "Walsh", "Wang", "Ward", "Ware", "Wass", "Watson", "Watts", "Webb", "Webster", "Wells", "West", "Whelan", "White", "Wilkenfeld", "Wilkinson", "Williams", "Williamson", "Willmer", "Wilson", "Wong", "Wood", "Woods", "Woolrich", "Wright", "Young", "Zhang"]>>
 
diff --git a/src/init/storyInit.tw b/src/init/storyInit.tw
index 4b55ab35649..7e19864709d 100644
--- a/src/init/storyInit.tw
+++ b/src/init/storyInit.tw
@@ -283,7 +283,7 @@ You should have received a copy of the GNU General Public License along with thi
 	<<set $seeBestiality = 0>>
 	<<set $seeHyperPreg = 0>>
 	<<set $seePreg = 1>>
-	<<set $dangerousPregancy = 1>>
+	<<set $dangerousPregnancy = 1>>
 	<<set $seeCircumcision = 1>>
 	<<set $seeAge = 1>>
 	<<set $seeDicks = 25>>
diff --git a/src/uncategorized/BackwardsCompatibility.tw b/src/uncategorized/BackwardsCompatibility.tw
index f411dd07205..8a540674851 100644
--- a/src/uncategorized/BackwardsCompatibility.tw
+++ b/src/uncategorized/BackwardsCompatibility.tw
@@ -585,8 +585,11 @@
 <<if ndef $seePreg>>
 	<<set $seePreg = 1>>
 <</if>>
-<<if ndef $dangerousPregancy>>
-	<<set $dangerousPregancy = 1>>
+<<if ndef $dangerousPregnancy>>
+	<<set $dangerousPregnancy = 1>>
+<</if>>
+<<if def $dangerousPregancy>>
+	<<unset $dangerousPregancy>>
 <</if>>
 <<if ndef $retainCareer>>
 	<<set $retainCareer = 1>>
diff --git a/src/uncategorized/reNickname.tw b/src/uncategorized/reNickname.tw
index 2bb704ee815..349c2a3a197 100644
--- a/src/uncategorized/reNickname.tw
+++ b/src/uncategorized/reNickname.tw
@@ -632,7 +632,7 @@
 	<<case "Swedish">>
 		<<set $nickname = either("'Gothenburg'", "'Ikea'", "'Norse'", "'Stockholm'", "'Swede'", "'Sweden Yes'", "'Swedish'")>>
 	<<case "Swiss">>
-		<<set $nickname = either("'Alpine'", "'Banker'", "'Bern'", "'Geneva'", "Helvetia'", "'Neutral'", "'Numbered Account'", "'Schlampe'", "'Swiss'", "'Swiss Miss'", "'ZĂĽrich'")>>
+		<<set $nickname = either("'Alpine'", "'Banker'", "'Bern'", "'Geneva'", "'Helvetia'", "'Neutral'", "'Numbered Account'", "'Schlampe'", "'Swiss'", "'Swiss Miss'", "'ZĂĽrich'")>>
 	<<case "Syrian">>
 		<<set $nickname = either("'Aleppo'", "'Assad'", "'Damascus'", "'Syrian'")>>
 	<<case "Taiwanese">>
diff --git a/src/uncategorized/saLongTermEffects.tw b/src/uncategorized/saLongTermEffects.tw
index 94d01db42e1..d1f73c32da2 100644
--- a/src/uncategorized/saLongTermEffects.tw
+++ b/src/uncategorized/saLongTermEffects.tw
@@ -8117,7 +8117,7 @@
 		<</if>>
 	<</if>>
 
-	<<if $dangerousPregancy != 0 && $slaves[$i].labor != 1>>
+	<<if $dangerousPregnancy != 0 && $slaves[$i].labor != 1>>
 		<<if ($slaves[$i].assignment != "work in the dairy" || $dairyRestraintsSetting < 2) && $slaves[$i].pregAdaptation < 500 && $slaves[$i].broodmother < 1>>
 			<<set _miscarriageChance = -10>>
 			<<set _miscarriageChance += (($slaves[$i].bellyPreg/1000)-$slaves[$i].pregAdaptation)>> /* this could use to not be linear */
@@ -8154,6 +8154,8 @@
 			<</if>>
 			<<if $slaves[$i].pregControl == "slow gestation">>
 				<<set _miscarriageChance -= 100>>
+			<<elseif $slaves[$i].pregControl == "labor supressors">>
+				<<set _miscarriageChance -= 10000>>
 			<<elseif $slaves[$i].pregControl == "speed up">>
 				<<if _miscarriageChance > 0>>
 					<<set _miscarriageChance *= 2>>
-- 
GitLab