{"thread":{"id":"4241","subject":"[PATCH] cvsimport: minor fixups","startedAt":"2006-05-22T12:45:47Z","lastAt":"2006-05-22T12:45:47Z","messageCount":1,"participants":["Martin Langhoff"],"isPatch":true,"patchVersion":1,"patchTotal":null},"messages":[{"id":"20443","messageId":"11483019472537-git-send-email-martin@catalyst.net.nz","threadId":"4241","inReplyTo":null,"subject":"[PATCH] cvsimport: minor fixups","fromName":"Martin Langhoff","fromEmail":"martin@catalyst.net.nz","sentAt":"2006-05-22T12:45:47Z","receivedAt":"2006-05-22T12:45:47Z","isPatch":true,"sender":{"key":"martin@laptop.org","avatar":null},"body":"Cleanup @skipped after it's used. Close a fhandle. \nRemoving suspects one at a time.\n\nSigned-off-by: Martin Langhoff <martin@catalyst.net.nz>\n\n\n---\n\n git-cvsimport.perl |    3 +++\n 1 files changed, 3 insertions(+), 0 deletions(-)\n\n93bef2832d30c9a04e95ff348b9ab8ab8cabee98\ndiff --git a/git-cvsimport.perl b/git-cvsimport.perl\nindex 2ecfe14..176b787 100755\n--- a/git-cvsimport.perl\n+++ b/git-cvsimport.perl\n@@ -650,6 +650,8 @@ sub commit {\n \t\t\t\"GIT_COMMITTER_DATE=\".strftime(\"+0000 %Y-%m-%d %H:%M:%S\",gmtime($date)),\n \t\t\t\"git-commit-tree\", $tree,@par);\n \t\tdie \"Cannot exec git-commit-tree: $!\\n\";\n+\t\t\n+\t\tclose OUT;\n \t}\n \t$pw->writer();\n \t$pr->reader();\n@@ -661,6 +663,7 @@ sub commit {\n \tif (@skipped) {\n \t    $logmsg .= \"\\n\\n\\nSKIPPED:\\n\\t\";\n \t    $logmsg .= join(\"\\n\\t\", @skipped) . \"\\n\";\n+\t    @skipped = ();\n \t}\n \n \tprint $pw \"$logmsg\\n\"\n-- \n1.3.2.g82000\n"}]}