Lines Matching refs:log
30 # Script to put change log comments in as default check-in comment.
48 print "Usage: [--help] [--regenerate-log] <log file>\n";
57 my $regenerateLog = checkForArgumentAndRemoveFromARGV("--regenerate-log");
58 my $log = $ARGV[0];
59 if (!$log) {
73 my $builtEditorApplication = "$baseDir/Release/Commit Log Editor.app/Contents/MacOS/Commit Log Editor";
80 my $builtEditorApplication = "$baseDir/Debug/Commit Log Editor.app/Contents/MacOS/Commit Log Editor";
87 my $builtEditorApplication = "$ENV{HOME}/Applications/Commit Log Editor.app/Contents/MacOS/Commit Log Editor";
108 open LOG, $log or die "Could not open the log file.";
109 while (<LOG>) {
121 # $_ contains the current git log message
122 # (without the log comment info). We don't need it.
128 close LOG;
130 # We want to match the line endings of the existing log file in case they're
137 print "Existing log message detected, Use 'r' to regenerate log message from ChangeLogs, or any other key to keep the existing message.\n";
144 # Don't change anything if there's already a log message (as can happen with git-commit --amend).
237 open NEWLOG, ">$log.edit" or die;
267 system (@editor, "$log.edit");
269 open NEWLOG, "$log.edit" or exit;
277 open NEWLOG, "$log.edit" or die;
278 open LOG, ">$log" or die;
280 print LOG;
282 close LOG;
286 unlink "$log.edit";
342 return $editor =~ m/commit-log-editor/;
