summaryrefslogtreecommitdiff
path: root/bin
diff options
context:
space:
mode:
authorelliott_c <elliott_c@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2006-01-04 19:50:58 +0000
committerelliott_c <elliott_c@ae88bc3d-4319-0410-8dbf-d08b4c9d3795>2006-01-04 19:50:58 +0000
commitc1deb24942c7ff35987fe741a9e1554b93e2a072 (patch)
tree2b1e2fd742400e47c87016cc249fb9d63a69ac33 /bin
parente5b8020ccc4eeead6b638358fe5a3a11659cc866 (diff)
downloadATCD-c1deb24942c7ff35987fe741a9e1554b93e2a072.tar.gz
ChangeLogTag: Wed Jan 4 19:50:27 UTC 2006 Chad Elliott <elliott_c@ociweb.com>
Diffstat (limited to 'bin')
-rw-r--r--bin/ChangeLogEditor/ChangeLogEntry.pm7
1 files changed, 4 insertions, 3 deletions
diff --git a/bin/ChangeLogEditor/ChangeLogEntry.pm b/bin/ChangeLogEditor/ChangeLogEntry.pm
index 23d8cfa1a87..2028dec1874 100644
--- a/bin/ChangeLogEditor/ChangeLogEntry.pm
+++ b/bin/ChangeLogEditor/ChangeLogEntry.pm
@@ -88,7 +88,7 @@ sub create {
$remov,
$confl,
$unknown) = $fl->locate(@dirs);
- my($entry) = scalar(localtime());
+ my($entry) = scalar(gmtime());
if (defined $$confl[0]) {
$entry = "ERROR: The following files have conflicts:\n";
@@ -99,8 +99,9 @@ sub create {
else {
my($prefix) = ' * ';
- ## Remove the timezone
- $entry =~ s/(:\d\d\s+)(.*)(\d\d\d\d)$/$1$3/;
+ ## Correct the timezone (if there is any)
+ my($tz) = 'UTC';
+ $entry =~ s/(:\d\d\s+)(.*)(\d\d\d\d)$/$1$tz $3/;
## Add the name and email address
$entry .= " $self->{'name'} <$self->{'email'}>\n\n";