Группа :: Система/Интернационализация
Пакет: 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.