dm6: fix inode naming for little-endian systems

[dupemerge] / dm6

diff --git a/dm6 b/dm6
index 1f76cae0269a8d85a0899a5596aea10264ad2c0f..b8cd25f1bf2319b3aaa3425cac05e712728fe1e1 100755 (executable)
--- a/dm6
+++ b/dm6
@@ -106,7 +106,7 @@ sub prepare_parents {
 
 sub name_quad {
        my ($int64) = @_;
-       my $packed = pack('Q', $int64);
+       my $packed = pack('Q>', $int64);
        $packed =~ s/^\0+//os;
        my $base64_packed = encode_base64($packed, '');
        # Don't strip off the trailing padding since it makes the string