X-Git-Url: https://git.donarmstrong.com/?a=blobdiff_plain;f=src%2Fmake-known-upper.lst;h=289893f11f1189c08e77a0ae6e90298d62720253;hb=8ace84503eae30ad101165a9bf4c96ac1c87f9b1;hp=f49d9de81560c8fc4e31ec31b4be6789632a142d;hpb=fcd1b19126a5a5f7312c0d789c832742623fa5bd;p=deb_pkgs%2Fscowl.git

diff --git a/src/make-known-upper.lst b/src/make-known-upper.lst
index f49d9de..289893f 100755
--- 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