Add 'gspell' utility

1 files changed, 16 insertions, 0 deletions

diff --git a/gspell b/gspell
new file mode 100755
index 0000000..5edb8e4
--- /dev/null
+++ b/gspell
@@ -0,0 +1,16 @@
+#!/bin/sh
+
+# gspell -- print locations of spelling errors in file
+
+f=`mktemp`
+if [ $# -eq 0 ]; then
+	g=`mktemp`
+	cat > $g
+	set -- $g
+fi
+
+spell "$@" > $f
+fgrep -Hnof $f "$@" |
+awk -F: 'NF > 2 { print $0; prefix = $1 ":" $2 ":"; next } { print prefix $0 }'
+rm $f
+rm $g 2>/dev/null