Login | Register
My pages Projects Community openCollabNet

Discussions > commits > svn commit: r45 - branches/SOPTIM/src/tsvnWizard.pas

delphiaddinfortortoisesvn
Discussion topic

Hide all messages in topic

All messages in topic

svn commit: r45 - branches/SOPTIM/src/tsvnWizard.pas

Author otto_noll
Full name Otto Noll
Date 2009-01-09 04:13:00 PST
Message Author: otto_noll
Date: 2009-01-09 04:13:00-0800
New Revision: 45

Modified:
   branches/SOPTIM/src/​tsvnWizard.pas

Log:
Replace (BorlandIDEServices as IOTAModuleServices).saveAll with SaveAllProjectfiles

Modified: branches/SOPTIM/src/​tsvnWizard.pas
Url: http://delphiaddinfo​rtortoisesvn.tigris.​org/source/browse/de​lphiaddinfortortoise​svn/branches/SOPTIM/​src/tsvnWizard.pas?v​iew=diff&pathrev​=45&r1=44&r2​=45
====================​====================​====================​==================
--- branches/SOPTIM/src/​tsvnWizard.pas (original)
+++ branches/SOPTIM/src/​tsvnWizard.pas 2009-01-09 04:13:00-0800
@@ -568,14 +568,16 @@
             end;
         SVN_UPDATE_TO_SANDBOX:
             if project <> nil then
- if MessageDlg( 'All project files will be saved before update. Continue?', mtConfirmation, [mbYes, mbNo], 0 ) = mrYes then begin
- (BorlandIDEServices as IOTAModuleServices).saveAll;
+ if MessageDlg( 'All project files will be saved before update. Continue?', mtConfirmation, [mbYes, mbNo], 0 ) = mrYes then
+ begin
+ SaveAllProjectfiles;
                     TSVNExec( '/command:update /rev /notempfile /path:' + AnsiQuotedStr( ExtractFilePath(proj​ect.GetFileName), '"' ) );
                 end;
         SVN_COMMIT_SANDBOX:
             if project <> nil then
- if MessageDlg( 'All project files will be saved before commit. Continue?', mtConfirmation, [mbYes, mbNo], 0 ) = mrYes then begin
- (BorlandIDEServices as IOTAModuleServices).saveAll;
+ if MessageDlg( 'All project files will be saved before commit. Continue?', mtConfirmation, [mbYes, mbNo], 0 ) = mrYes then
+ begin
+ SaveAllProjectfiles;
                     TSVNExec( '/command:commit /notempfile /path:' + AnsiQuotedStr( ExtractFilePath(proj​ect.GetFileName), '"' ) );
                 end;
         SVN_DIFF:
Messages per page: