fix off-by-one error in party number mangling
diff --git a/src/mgw_nat.erl b/src/mgw_nat.erl
index 0514900..992ff0a 100644
--- a/src/mgw_nat.erl
+++ b/src/mgw_nat.erl
@@ -127,7 +127,7 @@
 	MatchPfxLen = length(MatchPfx),
 	Pfx = lists:sublist(DigitsIn, 1, MatchPfxLen),
 	if Pfx == MatchPfx ->
-		Trailer = lists:sublist(DigitsIn, MatchPfxLen, length(DigitsIn)-MatchPfxLen),
+		Trailer = lists:sublist(DigitsIn, MatchPfxLen+1, length(DigitsIn)-MatchPfxLen),
 		DigitsOut = NewPfx ++ Trailer,
 		io:format("ISUP Party Number rewrite: ~p -> ~p~n", [DigitsIn, DigitsOut]);
 	   true ->