1 files changed, 1 insertions, 1 deletions

diff --git a/src/process.c b/src/process.c
index d8851c56cf0..8fbd8ac92e2 100644
--- a/src/process.c
+++ b/src/process.c
@@ -3041,7 +3041,7 @@ usage: (make-network-process &rest ARGS)  */)
         portstring = "0";
       else if (INTEGERP (service))
         {
-          sprintf (portbuf, "%ld", (long) XINT (service));
+          sprintf (portbuf, "%"pI"d", XINT (service));
           portstring = portbuf;
         }
       else