paweld/lazarus
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/lazarus/lazarus.git synced 2025-08-15 02:19:50 +02:00
Code Issues Packages Projects Releases Wiki Activity

IDE: compare files diff as source: do not add to project

Browse Source 
git-svn-id: trunk@47121 -
This commit is contained in:
mattias 2014-12-06 12:41:15 +00:00
parent 7ab6918cc8
commit 8e9dbfa85e
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
ide/main.pp
View File

@ -9999,7 +9999,7 @@ begin
if Result = mrYes then begin if Result = mrYes then begin
NewDiffFilename:=CreateSrcEditPageName('','FileDifference.diff', nil); NewDiffFilename:=CreateSrcEditPageName('','FileDifference.diff', nil);
Result:=DoNewEditorFile(FileDescriptorText,NewDiffFilename,DiffText, Result:=DoNewEditorFile(FileDescriptorText,NewDiffFilename,DiffText,
[nfOpenInEditor]); [nfOpenInEditor,nfIsNotPartOfProject]);
GetCurrentUnit(ActiveSrcEdit,ActiveUnitInfo); GetCurrentUnit(ActiveSrcEdit,ActiveUnitInfo);
if ActiveSrcEdit=nil then exit; if ActiveSrcEdit=nil then exit;
end; end;