Репозиторий ALT Linux backports/2.4
Последнее обновление: 9 июля 2008 | Пакетов: 497 | Посещений: 1587671
 поиск   регистрация   авторизация 
 
Группа :: Система/Интернационализация
Пакет: mova

 Главная   Изменения   Спек   Патчи   Загрузить   Bugs and FR 

Патч: mova-4.0-alt-blank.patch


--- /home/lav/work/build/BUILD/mova-4.0alt/usr/bin/movaTK	2004-12-19 22:06:08 +0300
+++ usr/local/bin/movaTK	2004-12-19 22:06:50 +0300
@@ -154,8 +154,10 @@
 
 proc Mova {arg} {
 global word argv0 index_dic
-if {[catch {set word [selection get]} error] != 0} {set word " "
-}
+if {[catch {set word [selection get]} error]} {set word " "}
 set word [string tolower [string trimleft $word "       \"\(\{"]]
+Fresh
+#if {[string is alpha $word] == 0} {set word " "} 
+if {($word=="") || ($word==" ")} {set word " "; return}
 set hash_word [string index $word 0][string index $word 1]
 Fresh
--- mova.orig	2003-11-10 01:04:18 +0300
+++ usr/local/bin/mova	2003-11-10 01:04:23 +0300
@@ -1,4 +1,4 @@
-#!/bin/bash
+#!/bin/sh
 case $# in
 0) echo "\"mova\" is a bash script to search for a word, or a collocation, or the tandem of symbols in a dictionary.
 ver. 4.0, (C) E.S.Cymbalyuk 1999. Under GNU GPL. No Warranty.
 
design & coding: Vladimir Lettiev aka crux © 2004-2005