Subversion Repositories wimsdev

Rev

Rev 6747 | Show entire file | Ignore whitespace | Details | Blame | Last modification | View Log | RSS feed

Rev 6747 Rev 6879
Line 136... Line 136...
136
  Gotcnt=0
136
  Gotcnt=0
137
!!! classes
137
!!! classes
138
  !if $search_category iswordof A C
138
  !if $search_category iswordof A C
139
   !read search.C
139
   !read search.C
140
   dictionary=bases/sys/words.$search_lang
140
   dictionary=bases/sys/words.$search_lang
-
 
141
   suffix_dictionary=
141
   translator_unknown=leave
142
   translator_unknown=leave
142
   srch=!exec translator $srch
143
   srch=!exec translator $srch
143
   srch=!trim $srch
144
   srch=!trim $srch
144
   gotmC=$gotm
145
   gotmC=$gotm
145
   gotwC=$gotw
146
   gotwC=$gotw
Line 149... Line 150...
149
   !if $gotcntC >0
150
   !if $gotcntC >0
150
     !set test_exist=!append item C to $test_exist
151
     !set test_exist=!append item C to $test_exist
151
   !endif
152
   !endif
152
   Gotcnt=$[$Gotcnt + $(gotcntC)]
153
   Gotcnt=$[$Gotcnt + $(gotcntC)]
153
  !endif
154
  !endif
-
 
155
!! use domaindic dictionnary to replace language by "english version"
-
 
156
!! the same is done in modind.c
-
 
157
  dictionary=bases/sys/domaindic.$search_lang
-
 
158
  suffix_dictionary=
-
 
159
  translator_unknown=leave
-
 
160
  srch=!exec translator $srch
-
 
161
  srch=!trim $srch
154
 
162
 
155
 !! correct misprints in the search words
163
  !! correct misprints in the search words
156
  dictionary=bases/sys/words.$search_lang
164
  dictionary=bases/sys/words.$search_lang
157
  suffix_dictionary=bases/sys/suffix.$search_lang
165
  suffix_dictionary=bases/sys/suffix.$search_lang
158
  translator_unknown=leave
166
  translator_unknown=leave
159
  srch=!exec translator $srch
167
  srch=!exec translator $srch
160
  srch=!trim $srch
168
  srch=!trim $srch