diff lib-src/gnuclient.c @ 267:966663fcf606 r20-5b32

Import from CVS: tag r20-5b32
author cvs
date Mon, 13 Aug 2007 10:26:29 +0200
parents 11cf20601dec
children c5d627a313b1
line wrap: on
line diff
--- a/lib-src/gnuclient.c	Mon Aug 13 10:25:39 2007 +0200
+++ b/lib-src/gnuclient.c	Mon Aug 13 10:26:29 2007 +0200
@@ -447,18 +447,19 @@
       send_string (s, command);
       if (load_library)
 	{
-	  sprintf (command, " (load-library %s)", clean_string (load_library));
-	  send_string (s, command);
+	  send_string (s , "(load-library ");
+	  send_string (s, clean_string(load_library));
+	  send_string (s, ") ");
 	}
       if (eval_form)
 	{
-	  sprintf (command, " %s", eval_form);
-	  send_string (s, command);
+	  send_string (s, eval_form);
 	}
       if (eval_function)
 	{
-	  sprintf (command, " (%s)", eval_function);
-	  send_string (s, command);
+	  send_string (s, "(");
+	  send_string (s, eval_function);
+	  send_string (s, ")");
 	}
       send_string (s, "))");
       send_string (s, EOT_STR);