summaryrefslogtreecommitdiff
path: root/Master/texmf-dist/tex/context/base/lang-wrd.mkiv
diff options
context:
space:
mode:
authorMojca Miklavec <mojca.miklavec@gmail.com>2012-05-14 17:38:55 +0000
committerMojca Miklavec <mojca.miklavec@gmail.com>2012-05-14 17:38:55 +0000
commit15995e10bfc68edf79970c4ea4fbb6678566c46e (patch)
tree2de7ca2a83f2d37ef043ad7429a5cb945bb79ddb /Master/texmf-dist/tex/context/base/lang-wrd.mkiv
parentc9a39f716f1e5ec820ed3aab2c9aef25c5a9d730 (diff)
ConTeXt 2012.05.14 16:00
git-svn-id: svn://tug.org/texlive/trunk@26371 c570f23f-e606-0410-a88d-b1316a301751
Diffstat (limited to 'Master/texmf-dist/tex/context/base/lang-wrd.mkiv')
-rw-r--r--Master/texmf-dist/tex/context/base/lang-wrd.mkiv37
1 files changed, 16 insertions, 21 deletions
diff --git a/Master/texmf-dist/tex/context/base/lang-wrd.mkiv b/Master/texmf-dist/tex/context/base/lang-wrd.mkiv
index 22c234d0c6d..6824899121f 100644
--- a/Master/texmf-dist/tex/context/base/lang-wrd.mkiv
+++ b/Master/texmf-dist/tex/context/base/lang-wrd.mkiv
@@ -5,7 +5,7 @@
%D subtitle=Checking,
%D author=Hans Hagen,
%D date=\currentdate,
-%D copyright={PRAGMA / Hans Hagen \& Ton Otten}]
+%D copyright={PRAGMA ADE \& \CONTEXT\ Development Team}]
%C
%C This module is part of the \CONTEXT\ macro||package and is
%C therefore copyrighted by \PRAGMA. See mreadme.pdf for
@@ -27,33 +27,28 @@
% \setupspellchecking[state=start,method=2]
% ...
% \typefile{\jobname.words}
+%
+% beware, maybe some day we will honour grouping
+%
+% 1: spell checking
+% 2: word counting
+% 3: language coloring
-\def\loadspellchecklist
- {\dodoubleempty\doloadspellchecklist}
-
-\def\doloadspellchecklist[#1][#2]%
- {\ctxlua{languages.words.load("#1","#2")}}
-
-\unexpanded\def\setupspellchecking
- {\dosingleargument\dosetupspellchecking}
-
-\newtoks\everysetupspellchecking
+\installcorenamespace{spell}
-\unexpanded\def\setupspellchecking[#1]% todo colors
- {\getparameters[\??wl][#1]%
- \the\everysetupspellchecking}
+\installdirectcommandhandler \??spell {spellchecking}
\appendtoks
- \doifelse\@@wlstate\v!start
- {\ctxlua{languages.words.enable { method = "\@@wlmethod", list = "\@@wllist" }}}
- {\ctxlua{languages.words.disable()}}%
+ \doifelse{\directspellcheckingparameter\c!state}\v!start
+ {\ctxcommand{enablespellchecking { method = "\directspellcheckingparameter\c!method", list = "\directspellcheckingparameter\c!list" }}}
+ {\ctxcommand{disablespellchecking()}}%
\to \everysetupspellchecking
-% beware, maybe some day we will honour grouping
+\unexpanded\def\loadspellchecklist
+ {\dodoubleempty\lang_spellchecking_load_list}
-% 1: spell checking
-% 2: word counting
-% 3: language coloring
+\def\lang_spellchecking_load_list[#1][#2]%
+ {\ctxcommand{loadspellchecklist("#1","#2")}}
\setupspellchecking
[\c!state=\v!stop,