1.1 --- /dev/null	Thu Jan 01 00:00:00 1970 +0000
     1.2 +++ b/INSTALL.sh	Wed Mar 31 18:59:02 2010 +0300
     1.3 @@ -0,0 +1,19 @@
     1.4 +#!/bin/sh
     1.5 +
     1.6 +if [ "$UID" == 0 ]
     1.7 +then
     1.8 +    DEST=/usr/local/bin/
     1.9 +else
    1.10 +    DEST=~/bin/
    1.11 +    mkdir -p ~/bin/
    1.12 +fi
    1.13 +
    1.14 +echo Installing new-words to "$DEST"
    1.15 +set -e
    1.16 +cp en.sh "${DEST}"/en
    1.17 +cp grep-sentences.pl "${DEST}"/grep-sentences
    1.18 +cp learn-words.sh "${DEST}"/learn-words
    1.19 +cp new-words.sh "${DEST}"/new-words
    1.20 +chmod +x ${DEST}/grep-sentences ${DEST}/learn-words ${DEST}/new-words ${DEST}/en
    1.21 +echo Done.
    1.22 +

     2.1 --- a/README	Wed Mar 31 18:56:56 2010 +0300
     2.2 +++ b/README	Wed Mar 31 18:59:02 2010 +0300
     2.3 @@ -7,6 +7,7 @@
     2.4  == Файлы ==
     2.5  
     2.6  README              Файл, который мы сейчас читаем
     2.7 +INSTALL.sh          Инсталляционный скрипт (копирует исполняемые файлы в /usr/local/bin/ или в ~/bin/)
     2.8  new-words.sh        Собственно программа (написана на sh)
     2.9  new-words.pl        Программа new-words, которую мы когда-нибудь напишем на Perl
    2.10  grep-sentences.pl   Программа, которая ищет в файле предложения (текст, разделённый точками) по словам

     3.1 --- a/new-words.sh	Wed Mar 31 18:56:56 2010 +0300
     3.2 +++ b/new-words.sh	Wed Mar 31 18:59:02 2010 +0300
     3.3 @@ -193,6 +193,7 @@
     3.4  }
     3.5  
     3.6  mkdir -p $WORK_DIR
     3.7 +oldpwd="$PWD"
     3.8  cd $WORK_DIR
     3.9  if echo "$1" | grep -q http: 
    3.10  then 
    3.11 @@ -200,7 +201,7 @@
    3.12      | get_words ${TEMP1}-full | add_stat ${TEMP1}-full| tee "$TEMP1" > "$TEMP2"
    3.13  elif [ "$#" != 0 ]
    3.14  then
    3.15 -    cat "$1" | tee $ORIGINAL_TEXT \
    3.16 +    cat "$oldpwd/$1" | tee $ORIGINAL_TEXT \
    3.17      | get_words ${TEMP1}-full | add_stat ${TEMP1}-full | tee "$TEMP1" > "$TEMP2"
    3.18  else 
    3.19      tee $ORIGINAL_TEXT \