From e270bf8e409aeee399c65c948ac74146660fc246 Mon Sep 17 00:00:00 2001
From: Karl Eick <hozosch@web.de>
Date: Sat, 6 Apr 2019 23:39:33 +0200
Subject: [PATCH] Improve existing rules, such as reverting back isch =IS, and
 adding exceptions instead

---
 dictsource/de_list  |  6 ++++--
 dictsource/de_rules | 18 ++++++++++++------
 2 files changed, 16 insertions(+), 8 deletions(-)

diff --git a/dictsource/de_list b/dictsource/de_list
index 28b1cc52..b5b2f2c2 100644
--- a/dictsource/de_list
+++ b/dictsource/de_list
@@ -746,7 +746,6 @@ extravagant      $1
 extrem          Ekstr'e:m
 
 foyer		fOj'e:
-französisch	$2
 friedvoll       fr'i:tfOl
 furchen         fUrC@n
 furie            $alt
@@ -980,7 +979,7 @@ zymbal		$1
 // Names
 Albanien	$2
 adrian	A:dri:A:n
-afghanistan	$2
+Alditalk	aldi:tO:k
 Alea	$2
 amerika	$2
 Andorra	and'OrA:
@@ -1047,6 +1046,7 @@ michael	mICae:l
 michaela	mICa'e:lA:
 Montenegro	mOnt@n'e:gro:
 Moradi	$2
+münchen	mynC@n
 naomi	$2
 Neumexiko       $2
 Neuseeland	$2
@@ -1054,6 +1054,7 @@ nordrhein	nOrd||raIn
 portugal	pOrtu:gal
 Rumänien	$2
 Rwanda		rU'andA:
+san	%zan
 saarbrücken	$2
 schlesien	Sle:zI@n
 schleswig	Sle:svIg#
@@ -1067,6 +1068,7 @@ Tom		tOm	$only
 Tim		tIm	$only
 Turkmenistan	$2
 ukraine	UkrA'i:n@
+vatikanstadt	vA:ti:k'A:nStat
 vera	v'e:rA:
 verena	ve:r'e:nA:
 westfalen	$2
diff --git a/dictsource/de_rules b/dictsource/de_rules
index de1b1181..f5845f83 100644
--- a/dictsource/de_rules
+++ b/dictsource/de_rules
@@ -53,6 +53,7 @@
         au         aU
         auh (_     aU
         auer	aU3
+    mold) auisch	aUIS
 
         ab (t_     A:p
         ag (t_     A:k
@@ -221,6 +222,8 @@ r     p) ay         EI
 
     _o) b (C       p
         baby       _^_EN
+        bela (rus	%bEl%a
+        bergisch	bErgIS
         beten      be:t@n
         bestimm	%b@StIm
      _) bike       _^_EN
@@ -424,7 +427,9 @@ r     p) ay         EI
      &) eres (_S4  @r@s
         er (d_     e:r
      &) er (r_     E
-     w) er (k_     Er
+        er (g     Er
+        erg  (_ Erg
+        erk (_     Erk
      &) erin (_    @rIn
      &) erisch (_  @rIS
    exp) er (t      Er
@@ -715,7 +720,7 @@ r     p) ay         EI
      @) io (n      Io:
         io         Io:
      @) is (_      Is
-     &) isch (_    IS
+     &) isch (_    =IS
         is (mus_   'Is
         istan	=IstA:n
         istisch (_	'IstIS
@@ -817,6 +822,7 @@ formal) ie         =I@
         lady       _^_EN
      _) land (C@P4 l'ant
      _) landes (@P6 l'and@s
+        ländisch	lEndIS
      _) lang (C@P4 l'aN
      _) lang (t@   l'aN
         langsam    l'aNzA:m
@@ -1033,6 +1039,7 @@ formal) ie         =I@
         rangier    rA:NZ'i:r
      _) re (d      re:
         register	re:g'Ist@r
+        reichisch	raICIS
         ressourc   rEs'Urs
         revers     r%e:vErs
 
@@ -1116,9 +1123,8 @@ formal) ie         =I@
         st (uh     St
         st (ung    st
 
-      _) sachs	zaks
-  nieder) sachs	zaks
-     &) sächs	zEks
+        sachse	zaks@
+     &) sächsisch	zEksIS
      _) safe       _^_EN
      &) schaft (_S6 Saft
 
@@ -1406,7 +1412,7 @@ formal) ie         =I@
      _) wovor      vo:f'o:r
      _) wohl (@P4  v'o:l
         work       _^_EN
-        württemberg	vyrt@mbErg
+        württem (berg	vyrt@m
 
 
 .group x