summaryrefslogtreecommitdiff
path: root/lib/blame.tcl
diff options
context:
space:
mode:
Diffstat (limited to 'lib/blame.tcl')
-rw-r--r--lib/blame.tcl14
1 files changed, 10 insertions, 4 deletions
diff --git a/lib/blame.tcl b/lib/blame.tcl
index d6d57d889d..8b032d9590 100644
--- a/lib/blame.tcl
+++ b/lib/blame.tcl
@@ -347,14 +347,20 @@ method _showcommit {lno} {
set author_time {}
catch {set author_name $header($cmit,author)}
catch {set author_email $header($cmit,author-mail)}
- catch {set author_time [clock format $header($cmit,author-time)]}
+ catch {set author_time [clock format \
+ $header($cmit,author-time) \
+ -format {%Y-%m-%d %H:%M:%S}
+ ]}
set committer_name {}
set committer_email {}
set committer_time {}
catch {set committer_name $header($cmit,committer)}
catch {set committer_email $header($cmit,committer-mail)}
- catch {set committer_time [clock format $header($cmit,committer-time)]}
+ catch {set committer_time [clock format \
+ $header($cmit,committer-time) \
+ -format {%Y-%m-%d %H:%M:%S}
+ ]}
if {[catch {set msg $header($cmit,message)}]} {
set msg {}
@@ -383,8 +389,8 @@ method _showcommit {lno} {
}
$w_cmit insert end "commit $cmit
-Author: $author_name $author_email $author_time
-Committer: $committer_name $committer_email $committer_time
+Author: $author_name $author_email $author_time
+Committer: $committer_name $committer_email $committer_time
Original File: [escape_path $line_file($lno)]
$msg"