fix numbering of variants to be 1 and 2 (closes: #867586)

[deb_pkgs/scowl.git] / src / make-contractions.lst

diff --git a/src/make-contractions.lst b/src/make-contractions.lst
index 970d2cbe7e7ac4707f9806ce556a2e861e12db25..a6cf3cb9711465eb21f47398f4b3a5ba1d420d0b 100755 (executable)
--- a/src/make-contractions.lst
+++ b/src/make-contractions.lst
@@ -2,6 +2,9 @@
 
 cat working/words.`src/get-level max`                 \
   | grep "'" | grep -v "'s$" | grep -v "^[A-Z]'[A-Z]" \
+  | comm -23 - r/special/not-upper                    \
+  | comm -23 - working/proper-names.lst               \
+  | comm -23 - working/abbreviations.lst              \
   > working/contractions.lst