I just want to give you a little update on the state of the Version Insight community version. This are the things that I’ve changed for SVN since my last status post back in November last year:
- Tweak: make the Subversion menu also appear for projects where the .dpr/.dpk is versioned, but the .dproj is not versioned (in the JCL or JVCL a lot of the projects does not have versioned .dproj files)
- Commit View: Tweak: the shown status for moved (renamed) files is now “Added (+)” instead of just “Added”
- Commit: Enhancement: Added the option “Delete backup files after commit” and when this option is enabled (it is disabled by default) then the local history of the committed files will be deleted
Furthermore I have created a branch for the Git and Hg integration. The repo URL is https://radstudioverins.svn.sourceforge.net/svnroot/radstudioverins/branches/git-hg
(Do you remember that you can checkout it with “File | Open From Version Control…”?)
This are the changes since the versions posted last November:
- Completed History View support for Git and Hg
- Added Log View support for Hg
(almost identical to the SVN version in the trunk apart from the missing range selection and reverse merging)
Make sure you have not missed the “instructions” for Git and Hg in the last status post.
Hello Uwe,
after some busy months I finally gave the Hg add-in a try some days ago, and the History View seems to work fine. I just noticed one small problem: it doesn’t work correctly if the file path contains a space. This is how I fixed it:
// —–
// HgClient.pas, l. 427
+function QuoteFileName (const FileName: String): String;
+begin
+ Result := ‘”‘ + FileName + ‘”‘;
+end;
function THgHistoryItem.GetFile: TBytes;
…
- CmdLine := FParent.FHgClient.HgExecutable + ‘ cat -r ‘ + FChangeSet + ‘ ‘ + FParent.FFileName;
+ CmdLine := FParent.FHgClient.HgExecutable + ‘ cat -r ‘ + FChangeSet + ‘ ‘
+ + QuoteFileName (FParent.FFileName);
…
procedure THgHistoryItem.LoadBlame;
…
- CmdLine := CmdLine + ExtractFileName(FParent.FFileName);
+ CmdLine := CmdLine + QuoteFileName (ExtractFileName(FParent.FFileName));
…
procedure THgItem.LoadHistory(AOnlyLast: Boolean = False);
…
- CmdLine := CmdLine + ExtractFileName(FFileName);
+ CmdLine := CmdLine + QuoteFileName (ExtractFileName(FFileName));
…
// —–
Now it seems to work. But I still miss the context menu in the project manager, the status icon overlays, the annotation editor sidebar, the compressed diff etc. etc.
No problem. I was busy with real life things.
I’ve committed the fix for the spaces in revision 45. Revision 44 added “Mercurial\Show Log\…” to the Project Manager. The next should be Commit and afterwards I might look again at blame in the editor.
Btw, I don’t use git, but from looking at the code I’d suspect it suffers from the same problem.
I guess you’re right.
Oh, and real life kept me busy as well. I hope I can do something about my own add-ins in the next weeks…
BTW, I’ve just committed the Commit View for Hg as revision 46.