{"thread":{"id":"12672","subject":"[PATCH v2] git-cvsimport: Add support for CVSNT as an underlying client","startedAt":"2008-03-13T17:45:18Z","lastAt":"2008-03-13T17:45:18Z","messageCount":1,"participants":["Emil Medve"],"isPatch":true,"patchVersion":2,"patchTotal":null},"messages":[{"id":"71965","messageId":"1205430318-4067-1-git-send-email-Emilian.Medve@Freescale.com","threadId":"12672","inReplyTo":null,"subject":"[PATCH v2] git-cvsimport: Add support for CVSNT as an underlying client","fromName":"Emil Medve","fromEmail":"emilian.medve@freescale.com","sentAt":"2008-03-13T17:45:18Z","receivedAt":"2008-03-13T17:45:18Z","isPatch":true,"sender":{"key":"emilian.medve@freescale.com","avatar":null},"body":"CVSNT seems to feature the following relevant differences from classic CVS:\n\t1. Keeps the password information in ~/.cvs/cvspass instead of ~/.cvspass\n\t2. Used '=' to separate fields in cvspass instead of ' '\n\nSigned-off-by: Emil Medve <Emilian.Medve@Freescale.com>\n---\n git-cvsimport.perl |    5 +++--\n 1 files changed, 3 insertions(+), 2 deletions(-)\n\ndiff --git a/git-cvsimport.perl b/git-cvsimport.perl\nindex 95c5eec..90bd6cc 100755\n--- a/git-cvsimport.perl\n+++ b/git-cvsimport.perl\n@@ -238,12 +238,13 @@ sub conn {\n \t\tmy $rr = \":pserver:$user\\@$serv:$port$repo\";\n \n \t\tunless ($pass) {\n-\t\t\topen(H,$ENV{'HOME'}.\"/.cvspass\") and do {\n+\t\t\t(open(H,$ENV{'HOME'}.\"/.cvspass\") or\n+\t\t\t open(H,$ENV{'HOME'}.\"/.cvs/cvspass\")) and do {\n \t\t\t\t# :pserver:cvs@mea.tmt.tele.fi:/cvsroot/zmailer Ah<Z\n \t\t\t\twhile (<H>) {\n \t\t\t\t\tchomp;\n \t\t\t\t\ts/^\\/\\d+\\s+//;\n-\t\t\t\t\tmy ($w,$p) = split(/\\s/,$_,2);\n+\t\t\t\t\tmy ($w,$p) = split(/\\s|=/,$_,2);\n \t\t\t\t\tif ($w eq $rr or $w eq $rr2) {\n \t\t\t\t\t\t$pass = $p;\n \t\t\t\t\t\tlast;\n-- \n1.5.4.GIT\n"}]}