[groff] 01/01: See bug #43555

[Deri James]

deri pushed a commit to branch master
in repository groff.

commit 2389ba44e01198016df79f2fbd60e6d1fcd1852a
Author: Deri James <address@hidden>
Date:   Fri Nov 7 18:35:44 2014 +0000

        See bug #43555
    
            * src/devices/gropdf/gropdf.pl: Correct Date Format
---
 ChangeLog                    |    6 ++++++
 src/devices/gropdf/gropdf.pl |    2 +-
 2 files changed, 7 insertions(+), 1 deletions(-)

diff --git a/ChangeLog b/ChangeLog
index e881f17..80cc07c 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,9 @@
+2014-11-07  Deri James  <address@hidden>
+
+       See bug #43555
+       
+       * src/devices/gropdf/gropdf.pl: Correct Date Format
+
 2014-11-04  Werner LEMBERG  <address@hidden>
 
        * src/libs/gnulib/*: Regenerate autotool files.
diff --git a/src/devices/gropdf/gropdf.pl b/src/devices/gropdf/gropdf.pl
index 035d123..5d1b346 100644
--- a/src/devices/gropdf/gropdf.pl
+++ b/src/devices/gropdf/gropdf.pl
@@ -465,7 +465,7 @@ sub GetObj
 sub PDFDate
 {
     my $dt=shift;
-    return(sprintf("D:%04d%02d%02d%02d%02d%02d% 
+02d'00'",$dt->[5]+1900,$dt->[4]+1,$dt->[3],$dt->[2],$dt->[1],$dt->[0],( 
localtime time() + 3600*( 12 - (gmtime)[2] ) )[2] - 12));
+    
return(sprintf("D:%04d%02d%02d%02d%02d%02d%+03d'00'",$dt->[5]+1900,$dt->[4]+1,$dt->[3],$dt->[2],$dt->[1],$dt->[0],(
 localtime time() + 3600*( 12 - (gmtime)[2] ) )[2] - 12));
 }
 
 sub ToPoints