new-words

annotate en.sh @ 29:c631833fa2be

minifixes related to unicode support
author Igor Chubin <igor@chub.in>
date Mon Jun 21 19:46:58 2010 +0300 (2010-06-21)
parents 46e987f4636d
children 07d89c2505e7
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@29 8 _dict()
igor@29 9 {
igor@22 10 case $myname in
igor@29 11 "de") DICT_NAME=deu-eng ;
igor@29 12 DICTD_SERVER_ARGS=''
igor@29 13 dict $DICTD_SERVER_ARGS -d "$DICT_NAME" "$@"
igor@29 14 ;;
igor@29 15 "pl") DICT_NAME=slovnyk_pl-ru
igor@29 16 dict $DICTD_SERVER_ARGS -d "$DICT_NAME" "$@"
igor@29 17 ;;
igor@29 18 "ru") DICT_NAME=ozhshv
igor@29 19 dict $DICTD_SERVER_ARGS -d "$DICT_NAME" "$@"
igor@29 20 ;;
igor@29 21 "uk")
igor@29 22 slovnyk "$1"
igor@29 23 ;;
igor@22 24 esac
igor@29 25 }
igor@22 26
igor@5 27 (
igor@29 28 myname="`echo $0 | sed s@.*/@@`"
igor@29 29 _dict "$@"
igor@5 30 if [ -e "$ORIGINAL_TEXT" ]
igor@5 31 then
igor@5 32 echo . . . . . . . . . . . . . . . . . . . . . . . . . ; echo
igor@5 33 grep-sentences "$*" "$ORIGINAL_TEXT"
igor@5 34 fi
igor@29 35 )
igor@29 36 # | less -p "$*"