From 9e06a9300911a3635da736688e4b5cdc4c5f131e Mon Sep 17 00:00:00 2001
From: Nick Roberts <nickrob@snap.net.nz>
Date: Sat, 23 Nov 2002 14:10:19 +0000
Subject: [PATCH] (tooltip-gud-print-command): Add server prefix to the print
 command for gdb to keep it out of the command history.

---
 lisp/tooltip.el | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/lisp/tooltip.el b/lisp/tooltip.el
index 7fd5533639d..a7d734516f2 100644
--- a/lisp/tooltip.el
+++ b/lisp/tooltip.el
@@ -482,7 +482,8 @@ If TOOLTIP-GUD-DEREFERENCE is t, also prepend a `*' to EXPR."
   (when tooltip-gud-dereference
     (setq expr (concat "*" expr)))
   (case tooltip-gud-debugger
-    ((gdb dbx) (concat "print " expr))
+    (gdb (concat "server print " expr))
+    (dbx (concat "print " expr))
     (xdb (concat "p " expr))
     (sdb (concat expr "/"))
     (perldb expr)))
-- 
2.39.2