Fix LT-22428: Add More than one line and Exactly one line filters

Src/Common/Controls/XMLViews/FilterBar.cs

@@ -967,6 +967,8 @@ protected void MakeCombo(FilterSortItem item)
 				case "true":
 					combo.Items.Add(new FilterComboItem(MakeLabel(XMLViewsStrings.ksBlanks), new BlankMatcher(), item));
 					combo.Items.Add(new FilterComboItem(MakeLabel(XMLViewsStrings.ksNonBlanks), new NonBlankMatcher(), item));
+					combo.Items.Add(new FilterComboItem(MakeLabel(XMLViewsStrings.ksMoreThanOneLine), new MoreThanOneLineMatcher(), item));
+					combo.Items.Add(new FilterComboItem(MakeLabel(XMLViewsStrings.ksExactlyOneLine), new ExactlyOneLineMatcher(), item));
 					break;
 			}
 

Src/Common/Controls/XMLViews/XMLViewsStrings.resx

@@ -1,4 +1,4 @@
-<?xml version="1.0" encoding="utf-8"?>
+<?xml version="1.0" encoding="utf-8"?>
 <root>
   <!-- 
     Microsoft ResX Schema 
@@ -330,6 +330,12 @@ Change the writing system of one of these columns or remove the duplicated colum
   <data name="ksNonBlanks" xml:space="preserve">
     <value>Non-blanks</value>
   </data>
+  <data name="ksMoreThanOneLine" xml:space="preserve">
+    <value>More than one line</value>
+  </data>
+  <data name="ksExactlyOneLine" xml:space="preserve">
+    <value>Exactly one line</value>
+  </data>
   <data name="ksNone" xml:space="preserve">
     <value>(none)</value>
   </data>

Src/Common/Filters/RecordFilter.cs

@@ -1341,6 +1341,7 @@ public override bool Matches(ITsString arg)
 			}
 			return false;
 		}
+
 		/// <summary>
 		/// True if it is the same class and member vars match.
 		/// </summary>
@@ -1352,6 +1353,65 @@ public override bool SameMatcher(IMatcher other)
 		}
 	}
 
+	/// <summary>
+	/// Matches entries with more than one line.
+	/// </summary>
+	public class MoreThanOneLineMatcher : BaseMatcher
+	{
+		/// ------------------------------------------------------------------------------------
+		/// <summary>
+		/// Contains a new line.
+		/// </summary>
+		/// <param name="arg"></param>
+		/// <returns></returns>
+		/// ------------------------------------------------------------------------------------
+		public override bool Matches(ITsString arg)
+		{
+			if (arg == null || arg.Length == 0)
+				return false;
+			return arg.Text.Contains("\r");
+		}
+
+		/// <summary>
+		/// True if it is the same class and member vars match.
+		/// </summary>
+		/// <param name="other"></param>
+		/// <returns></returns>
+		public override bool SameMatcher(IMatcher other)
+		{
+			return other is MoreThanOneLineMatcher;
+		}
+	}
+
+	/// <summary>
+	/// Matches entries with exactly one line.
+	/// </summary>
+	public class ExactlyOneLineMatcher : BaseMatcher
+	{
+		/// ------------------------------------------------------------------------------------
+		/// <summary>
+		/// Does not contain a new line and is not empty.
+		/// </summary>
+		/// <param name="arg"></param>
+		/// <returns></returns>
+		/// ------------------------------------------------------------------------------------
+		public override bool Matches(ITsString arg)
+		{
+			if (arg == null || arg.Length == 0)
+				return false;
+			return !arg.Text.Contains("\r");
+		}
+		/// <summary>
+		/// True if it is the same class and member vars match.
+		/// </summary>
+		/// <param name="other"></param>
+		/// <returns></returns>
+		public override bool SameMatcher(IMatcher other)
+		{
+			return other is ExactlyOneLineMatcher;
+		}
+	}
+
 	/// <summary>
 	/// Matches if the embedded matcher fails.
 	/// </summary>

Src/Common/RootSite/CollectorEnv.cs

@@ -2921,6 +2921,11 @@ public TsStringCollectorEnv(IVwEnv baseEnv, ISilDataAccess sda, int hvoRoot):
 		/// ------------------------------------------------------------------------------------
 		public override void AddTsString(ITsString tss)
 		{
+			if (m_builder.Text != null)
+			{
+				// Allow MoreThanOneLineMatcher and ExactlyOneLineMatcher to distinguish lines.
+				m_builder.Append("\r");
+			}
 			AppendSpaceForFirstWordInNewParagraph(tss.Text);
 			m_builder.AppendTsString(tss);
 		}
@@ -2933,6 +2938,11 @@ public override void AddTsString(ITsString tss)
 		/// ------------------------------------------------------------------------------------
 		internal protected override void AddResultString(string s)
 		{
+			if (m_builder.Text != null)
+			{
+				// Allow MoreThanOneLineMatcher and ExactlyOneLineMatcher to distinguish lines.
+				m_builder.Append("\r");
+			}
 			AppendSpaceForFirstWordInNewParagraph(s);
 			m_builder.Append(s);
 		}

Src/LexText/Interlinear/ITextDllTests/SandboxBaseTests.cs

@@ -427,8 +427,8 @@ public void LexEntriesComboHandler_ItemsInComboForInflVariant()
 
 					var handlerList =  handler.ComboList.Items;
 
-					Assert.That(handlerList[0].ToString(), Is.EqualTo("Add New Sense for blondeEntry ..."));
-					Assert.That(handlerList[1].ToString(), Is.EqualTo("  fair haired, ???, blondEntry+dial.var."));
+					Assert.That(handlerList[0].ToString(), Is.EqualTo("Add New Sense for blondeEntry\r ..."));
+					Assert.That(handlerList[1].ToString(), Is.EqualTo("  fair haired, ???, blondEntry\r\r+\rdial.var."));
 					Assert.That(handlerList[2].ToString(), Is.EqualTo("    Add New Sense..."));
 				}
 			}