From c846812f855237aa32856865f00568237d73bcca Mon Sep 17 00:00:00 2001 From: Pritpal Bedi Date: Sun, 3 Jan 2010 11:02:26 +0000 Subject: [PATCH] 2010-01-03 03:00 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) * contrib/hbide/hbide.prg ! Applied Vailton's patch posted as diff. --- harbour/ChangeLog | 4 ++++ harbour/contrib/hbide/hbide.prg | 7 ++----- 2 files changed, 6 insertions(+), 5 deletions(-) diff --git a/harbour/ChangeLog b/harbour/ChangeLog index 44b3c09e3b..41e4e1f1b2 100644 --- a/harbour/ChangeLog +++ b/harbour/ChangeLog @@ -17,6 +17,10 @@ past entries belonging to author(s): Viktor Szakats. */ +2010-01-03 03:00 UTC-0800 Pritpal Bedi (pritpal@vouchcac.com) + * contrib/hbide/hbide.prg + ! Applied Vailton's patch posted as diff. + 2010-01-03 11:00 UTC+0100 Viktor Szakats (harbour.01 syenar.hu) * contrib/hbqt/generator/hbqtgen.prg ! Fixed formatting for one generated headder. diff --git a/harbour/contrib/hbide/hbide.prg b/harbour/contrib/hbide/hbide.prg index 6350e55603..9ded56b10c 100644 --- a/harbour/contrib/hbide/hbide.prg +++ b/harbour/contrib/hbide/hbide.prg @@ -735,6 +735,8 @@ METHOD HbIde:closeSource( nTab, lCanCancel, lCanceled ) IF !::aTabs[ nTab, TAB_QDOCUMENT ]:isModified() * File has not changed, ignore the question to User + lSave := .f. + ELSEIF lCanCancel n := GetYesNoCancel( ::aTabs[ nTab, TAB_OTAB ]:Caption, ; "Has been modified, save this source?", 'Save?' ) @@ -772,11 +774,6 @@ METHOD HbIde:closeAllSources() * Finally now we will close all tabs. DO WHILE ( ++i <= Len( ::aTabs ) ) - - IF !::aTabs[ i, TAB_QDOCUMENT ]:isModified() - Loop - End - IF ::closeSource( i, .T., @lCanceled ) i -- Loop