summaryrefslogtreecommitdiff
path: root/extras
diff options
context:
space:
mode:
authorGraeme Geldenhuys <graeme@mastermaths.co.za>2010-07-08 15:52:15 +0200
committerGraeme Geldenhuys <graeme@mastermaths.co.za>2010-07-08 15:52:15 +0200
commite6a2a6ff7553ff718d851125a181eeb2eceba7f8 (patch)
tree27775cb48a9625d280f54cc61725a58cbc43cac1 /extras
parentc442e9abe68adffecac7f6960c0d6eba3efe8f53 (diff)
downloadfpGUI-e6a2a6ff7553ff718d851125a181eeb2eceba7f8.tar.xz
Memo Mediator: Remove trailing whitespace.
Sometimes we had NewLine character or whitespace. We don't need those, so trim it off.
Diffstat (limited to 'extras')
-rw-r--r--extras/tiopf/gui/tiMediators.pas2
1 files changed, 1 insertions, 1 deletions
diff --git a/extras/tiopf/gui/tiMediators.pas b/extras/tiopf/gui/tiMediators.pas
index b2dacea9..889f6540 100644
--- a/extras/tiopf/gui/tiMediators.pas
+++ b/extras/tiopf/gui/tiMediators.pas
@@ -581,7 +581,7 @@ end;
procedure TtiMemoMediatorView.DoGuiToObject;
begin
- Subject.PropValue[FieldName] := View.Lines.Text;
+ Subject.PropValue[FieldName] := Trim(View.Lines.Text);
end;
procedure TtiMemoMediatorView.SetObjectUpdateMoment(const AValue: TtiObjectUpdateMoment);