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

[deb_pkgs/scowl.git] / src / make-known-upper.lst

diff --git a/src/make-known-upper.lst b/src/make-known-upper.lst
index f49d9de81560c8fc4e31ec31b4be6789632a142d..289893f11f1189c08e77a0ae6e90298d62720253 100755 (executable)
--- a/src/make-known-upper.lst
+++ b/src/make-known-upper.lst
@@ -2,9 +2,10 @@
 
 cat l/upper/*                                      \
   | src/filter                                     \
-  | tr -d '\r'                                     \
   | grep "^[A-Z]"                                  \
   | src/find-ss working/all.lst                    \
+  | sort -u                                        \
+  | comm -23 - r/special/not-upper                 \
   | src/add-other-spellings                        \
   | sort -u                                        \
   > working/known-upper.lst