@@ -149,7 +149,7 @@ private void AddXAmplePropertiesToLexiconFile()
149149 list . Name . BestAnalysisAlternative . Text
150150 == customListName
151151 ) ;
152- BuildAllomorphPropertyMapper ( allomorphHvoPropertyMapper , customList ) ;
152+ BuildAllomorphPropertyMapper ( allomorphHvoPropertyMapper , customList , customListName ) ;
153153 BuildMorphemePropertyMapper ( morphemePropertyMapper , customList ) ;
154154 // Add allomorph properties
155155 var lexWithAlloProps = allomorphHvoPropertyMapper . Aggregate (
@@ -178,25 +178,37 @@ private void CreateXAmpleTempFileAndCopyBack(string xAmpleFile, string tempExten
178178
179179 private static void BuildAllomorphPropertyMapper (
180180 Dictionary < string , string > allomorphHvoPropertyMapper ,
181- ICmPossibilityList customList )
181+ ICmPossibilityList customList , string customListName )
182182 {
183183 foreach ( var prop in customList . PossibilitiesOS )
184184 {
185185 var refObjs = prop . ReferringObjects . Select ( o => o ) . Where ( o => ! ( o is ILexEntry ) ) ;
186186 foreach ( ICmObject obj in refObjs )
187187 {
188188 var sHvo = obj . Hvo . ToString ( ) ;
189- if ( ! allomorphHvoPropertyMapper . ContainsKey ( sHvo ) )
189+ var hvoMatch = " {" + sHvo + "}" ;
190+ if ( ! allomorphHvoPropertyMapper . ContainsKey ( hvoMatch ) )
190191 {
191- var hvoMatch = " {" + sHvo + "}" ;
192- var replaceWith =
193- hvoMatch + " " + prop . Name . AnalysisDefaultWritingSystem . Text ;
192+ var replaceWith = hvoMatch + " " + prop . Name . AnalysisDefaultWritingSystem . Text ;
194193 allomorphHvoPropertyMapper . Add ( hvoMatch , replaceWith ) ;
194+ } else
195+ {
196+ // Append the new value to the existing value.
197+ allomorphHvoPropertyMapper [ hvoMatch ] += " " + prop . Name . AnalysisDefaultWritingSystem . Text ;
195198 }
196199 }
197200 }
198201 }
199202
203+ private static string LexEntryName ( ICmObject obj )
204+ {
205+ if ( obj . ClassName == "MoAffixAllomorph" )
206+ {
207+ return ( ( IMoAffixAllomorph ) obj ) . LongName ;
208+ }
209+ return "***" ;
210+ }
211+
200212 private static void BuildMorphemePropertyMapper (
201213 Dictionary < string , string > morphemePropertyMapper ,
202214 ICmPossibilityList customList
0 commit comments