From 4da63915237b835e42669a0fa4657175e4d7ac1b Mon Sep 17 00:00:00 2001
From: Graeme Geldenhuys <graeme@mastermaths.co.za>
Date: Fri, 26 Aug 2011 09:49:42 +0200
Subject: ide: added user feedback when a unit is saved.

---
 examples/apps/ide/src/frm_main.pas | 1 +
 1 file changed, 1 insertion(+)

diff --git a/examples/apps/ide/src/frm_main.pas b/examples/apps/ide/src/frm_main.pas
index a445b76c..d017b203 100644
--- a/examples/apps/ide/src/frm_main.pas
+++ b/examples/apps/ide/src/frm_main.pas
@@ -185,6 +185,7 @@ begin
   s := pcEditor.ActivePage.Hint;
   if s <> '' then
     TfpgTextEdit(pcEditor.ActivePage.Components[0]).SaveToFile(s);
+  AddMessage('File saved');
 end;
 
 procedure TMainForm.miFileSaveAs(Sender: TObject);
-- 
cgit v1.2.3-70-g09d2