From 7066bfeb42b9adb1d3d6d8df2b6231b8a144f800 Mon Sep 17 00:00:00 2001
From: ram <ram>
Date: Thu, 27 Oct 1994 02:37:22 +0000
Subject: [PATCH] missing comma.

---
 motif/lisp/prototypes.lisp | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/motif/lisp/prototypes.lisp b/motif/lisp/prototypes.lisp
index 3c58cef0c..d90e5342a 100644
--- a/motif/lisp/prototypes.lisp
+++ b/motif/lisp/prototypes.lisp
@@ -40,7 +40,7 @@
 	(code (fill-pointer *request-table*)))
     `(progn
        (eval-when (compile load eval)
-	 (vector-push-extend (format nil "R~a" string-name) *request-table*))
+	 (vector-push-extend (format nil "R~a" ,string-name) *request-table*))
        (defun ,symbol-name ,arg-list
 	 ,doc-string
 	 ;; *** This generates lots of warnings at the moment
-- 
GitLab