updated for version 7.1a
diff --git a/runtime/spell/da/main.aap b/runtime/spell/da/main.aap
index 65e1a2f..4c371b2 100644
--- a/runtime/spell/da/main.aap
+++ b/runtime/spell/da/main.aap
@@ -35,7 +35,7 @@
:fetch da_DK.zip
:sys $UNZIP da_DK.zip
:delete da_DK.zip
- :delete contributors COPYING Makefile da_DK.excluded
+ :delete COPYING Makefile da_DK.excluded
@if not os.path.exists('da_DK.orig.aff'):
:copy da_DK.aff da_DK.orig.aff
@if not os.path.exists('da_DK.orig.dic'):
diff --git a/runtime/spell/pl/main.aap b/runtime/spell/pl/main.aap
index eb21c5e..74cd1d5 100644
--- a/runtime/spell/pl/main.aap
+++ b/runtime/spell/pl/main.aap
@@ -33,29 +33,19 @@
#
# Fetching the files from
#
-HTTPDIR = http://www.kurnik.pl/slownik/ort/
+HTTPDIR = http://www.kurnik.pl/dictionary
# The files don't depend on the .zip file so that we can delete it.
# Only download the zip file if the targets don't exist.
# This is a bit tricky, since the file name includes the date.
pl_PL.aff pl_PL.dic: {buildcheck=}
:assertpkg tar bunzip2
- @from time import strftime, gmtime, time
- @for day in range(20):
- date = `strftime('%Y%m%d', gmtime(time() - day * 24 * 60 * 60))`
- base = alt-myspell-pl-$date
- fname = $base.tar.bz2
- :attr {fetch = $HTTPDIR/%file%} $fname
- @try:
- :fetch $fname
- ok = 1
- @except:
- ok = 0
- @if ok:
- @break
+ fname = alt-myspell-pl.tar.bz2
+ :attr {fetch = $HTTPDIR/%file%} $fname
+ :fetch $fname
:sys bunzip2 -c $fname | tar xf -
- :move $base/* .
- :deldir $base
+ :move alt-myspell-pl-20[0-9]*/* .
+ :deldir alt-myspell-pl-20[0-9]*
:delete $fname
@if not os.path.exists('pl_PL.orig.aff'):
:copy pl_PL.aff pl_PL.orig.aff
@@ -79,21 +69,11 @@
check:
:assertpkg tar bunzip2 diff
- @from time import strftime, gmtime, time
- @for day in range(20):
- date = `strftime('%Y%m%d', gmtime(time() - day * 24 * 60 * 60))`
- base = alt-myspell-pl-$date
- fname = $base.tar.bz2
- :attr {fetch = $HTTPDIR/%file%} $fname
- @try:
- :fetch $fname
- ok = 1
- @except:
- ok = 0
- @if ok:
- @break
+ fname = alt-myspell-pl.tar.bz2
+ :attr {fetch = $HTTPDIR/%file%} $fname
+ :fetch $fname
:sys bunzip2 -c $fname | tar xf -
- :cd $base
+ :cd alt-myspell-pl-20[0-9]*
@try:
@import stat
:sys $UNZIP ../pl_PL.zip
diff --git a/runtime/spell/pt/pt_PT.diff b/runtime/spell/pt/pt_PT.diff
index 653a2d2..cb287d1 100644
--- a/runtime/spell/pt/pt_PT.diff
+++ b/runtime/spell/pt/pt_PT.diff
@@ -1,27 +1,35 @@
-*** pt_PT.orig.aff Wed Aug 31 20:05:16 2005
---- pt_PT.aff Wed Aug 31 20:05:16 2005
+*** pt_PT.orig.aff Mon Apr 16 15:20:13 2007
+--- pt_PT.aff Mon Apr 16 15:52:13 2007
***************
*** 3,4 ****
---- 3,24 ----
+--- 3,7 ----
+ FOL ßàáâãäåæçèéêëìíîïðñòóôõöøùúûüýþÿ
+ LOW ßàáâãäåæçèéêëìíîïðñòóôõöøùúûüýþÿ
+ UPP ßÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖØÙÚÛÜÝÞÿ
-+
-+ SOFOFROM abcdefghijklmnopqrstuvwxyzABCDEFGHIJKLMNOPQRSTUVWXYZàáâãäåæçèéêëìíîïðñòóôõöøùúûüýþßÿÀÁÂÃÄÅÆÇÈÉÊËÌÍÎÏÐÑÒÓÔÕÖØÙÚÛÜÝÞ¿
-+ SOFOTO ebctefghejklnnepkrstevvkesebctefghejklnnepkrstevvkeseeeeeeeceeeeeeeedneeeeeeeeeeepseeeeeeeeceeeeeeeedneeeeeeeeeeep?
-+
-+ MIDWORD '
-+
-+ MAP 9
-+ MAP aàáâãäå
-+ MAP eèéêë
-+ MAP iìíîï
-+ MAP oòóôõö
-+ MAP uùúûü
-+ MAP nñ
-+ MAP cç
-+ MAP yÿý
-+ MAP sß
-+
- PFX A Y 1
+
+***************
+*** 1065,1078 ****
+
+! MAP 11
+! MAP aá
+! MAP aã
+! MAP aâ
+! MAP eé
+! MAP eê
+! MAP ií
+ MAP cç
+! MAP oó
+! MAP oô
+! MAP oõ
+! MAP uú
+!
+--- 1068,1075 ----
+
+! MAP 6
+! MAP aáãâAÁÃÂ
+! MAP eéêEÉÊ
+! MAP iíIÍ
+ MAP cç
+! MAP oóõôOÓÕÔ
+! MAP uúüUÚÜ