Lines Matching refs:log
30 # Script to put change log comments in as default check-in comment.
46 print "Usage: [--help] [--regenerate-log] <log file>\n";
55 my $regenerateLog = checkForArgumentAndRemoveFromARGV("--regenerate-log");
56 my $log = $ARGV[0];
57 if (!$log) {
68 my $builtEditorApplication = "$baseDir/Release/Commit Log Editor.app/Contents/MacOS/Commit Log Editor";
72 my $builtEditorApplication = "$baseDir/Debug/Commit Log Editor.app/Contents/MacOS/Commit Log Editor";
76 my $installedEditorApplication = "$ENV{HOME}/Applications/Commit Log Editor.app/Contents/MacOS/Commit Log Editor";
87 open LOG, $log or die;
88 while (<LOG>) {
100 # $_ contains the current git log message
101 # (without the log comment info). We don't need it.
107 close LOG;
109 # We want to match the line endings of the existing log file in case they're
116 print "Existing log message detected, Use 'r' to regenerate log message from ChangeLogs, or any other key to keep the existing message.\n";
123 # Don't change anything if there's already a log message
224 open NEWLOG, ">$log.edit" or die;
254 system $editor, "$log.edit";
256 open NEWLOG, "$log.edit" or exit;
264 open NEWLOG, "$log.edit" or die;
265 open LOG, ">$log" or die;
267 print LOG;
269 close LOG;
273 unlink "$log.edit";
