new-words
annotate en.sh @ 27:0a80b2fa3ed8
initial tagging support
| author | Igor Chubin <igor@chub.in> |
|---|---|
| date | Fri May 21 19:53:24 2010 +0300 (2010-05-21) |
| parents | 9345cc05fdd1 |
| children | c631833fa2be |
| rev | line source |
|---|---|
| igor@5 | 1 #!/bin/sh |
| igor@5 | 2 |
| igor@22 | 3 DICTD_SERVER="dictd.xdsl.by" |
| igor@22 | 4 DICTD_SERVER_ARGS="-h $DICTD_SERVER" |
| igor@22 | 5 DICT_NAME=mueller24 |
| igor@22 | 6 |
| igor@22 | 7 |
| igor@22 | 8 myname="`echo $0 | sed s@.*/@@`" |
| igor@22 | 9 case $myname in |
| igor@22 | 10 "de") DICT_NAME=deu-eng ; DICTD_SERVER_ARGS='' ;; |
| igor@22 | 11 "pl") DICT_NAME=slovnyk_pl-ru ;; |
| igor@22 | 12 "ru") DICT_NAME=ozhshv ;; |
| igor@22 | 13 esac |
| igor@22 | 14 |
| igor@5 | 15 ( |
| igor@22 | 16 dict $DICTD_SERVER_ARGS -d "$DICT_NAME" "$@" |
| igor@5 | 17 if [ -e "$ORIGINAL_TEXT" ] |
| igor@5 | 18 then |
| igor@5 | 19 echo . . . . . . . . . . . . . . . . . . . . . . . . . ; echo |
| igor@5 | 20 grep-sentences "$*" "$ORIGINAL_TEXT" |
| igor@5 | 21 fi |
| igor@5 | 22 ) | less -p "$*" |