From 6cfefb966753d1a3780e48ad8b04edd647f1c114 Mon Sep 17 00:00:00 2001 From: ram <ram> Date: Thu, 3 Mar 1994 16:53:31 +0000 Subject: [PATCH] Changed ~A to ~D when formatting socket file in case the base isn't 10. --- motif/lisp/internals.lisp | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/motif/lisp/internals.lisp b/motif/lisp/internals.lisp index 73aaf1ded..800595044 100644 --- a/motif/lisp/internals.lisp +++ b/motif/lisp/internals.lisp @@ -67,8 +67,8 @@ (handler-case (ext::connect-to-unix-socket (if pid - (format nil "/tmp/.motif_socket-p~a" pid) - (format nil "/tmp/.motif_socket-u~a" (unix:unix-getuid)))) + (format nil "/tmp/.motif_socket-p~D" pid) + (format nil "/tmp/.motif_socket-u~D" (unix:unix-getuid)))) (error () (ext:connect-to-unix-socket "/tmp/.motif_socket")))) (error () -- GitLab