[groff] 01/01: Problem running gropdf on big endian (Sparc)

[Deri James]

deri pushed a commit to branch master
in repository groff.

commit 2dfd47edd74321fbccd74e9ae4dc70a99d1efb40
Author: Deri James <address@hidden>
Date:   Fri Dec 7 13:24:17 2018 +0000

    Problem running gropdf on big endian (Sparc)
    
    * src/devices/gropdf/gropdf.pl: When loading a binary (.pfb)
    font for embedding always use little endian to unpack chunk
    headers.
---
 ChangeLog                    | 8 ++++++++
 src/devices/gropdf/gropdf.pl | 2 +-
 2 files changed, 9 insertions(+), 1 deletion(-)

diff --git a/ChangeLog b/ChangeLog
index ff44953..fc192ec 100644
--- a/ChangeLog
+++ b/ChangeLog
@@ -1,3 +1,11 @@
+2018-12-07  Deri James  <address@hidden>
+
+       Problem running gropdf on big endian (Sparc)
+
+       * src/devices/gropdf/gropdf.pl: When loading a binary (.pfb)
+       font for embedding always use little endian to unpack chunk
+       headers.
+
 2018-12-05  Bertrand Garrigues <address@hidden>
 
        Skip hdtbl and mom tests if needed config is missing.
diff --git a/src/devices/gropdf/gropdf.pl b/src/devices/gropdf/gropdf.pl
index d83568d..6ba05c0 100644
--- a/src/devices/gropdf/gropdf.pl
+++ b/src/devices/gropdf/gropdf.pl
@@ -2425,7 +2425,7 @@ sub GetChunk
 
                Msg(1,"Failed to read binary segment length"), return if $ct != 
4;
 
-               my $sl=unpack('L',$hdr);
+               my $sl=unpack('L<',$hdr);
                my $data;
                my $chk=read($F,$data,$sl);