diff --git a/lib/Crypt/PWSafe3/Field.pm b/lib/Crypt/PWSafe3/Field.pm
index 4677b4d..fc0190d 100644
--- a/lib/Crypt/PWSafe3/Field.pm
+++ b/lib/Crypt/PWSafe3/Field.pm
@@ -90,7 +90,7 @@ sub new {
 	$self->{raw} = pack("L<", $param{value});
       }
       elsif (grep { $_ eq $param{type} } @convhex) {
-	$self->{raw} = pack('L<4', $param{value});
+	$self->{raw} = pack('H*', $param{value});
       }
       elsif (grep { $_ eq $param{type} } @convbyte) {
 	$self->{raw} = pack('W<*', $param{value});