Index: generic/gdbtk-cmds.c
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/generic/gdbtk-cmds.c,v
retrieving revision 1.67
diff -u -p -r1.67 gdbtk-cmds.c
--- generic/gdbtk-cmds.c	20 Feb 2003 12:12:33 -0000	1.67
+++ generic/gdbtk-cmds.c	20 Feb 2003 17:50:39 -0000
@@ -1373,10 +1373,10 @@ gdb_search (ClientData clientData, Tcl_I
 
 	  if (p->msymbol == NULL)
 	    Tcl_ListObjAppendElement (interp, elem,
-				      Tcl_NewStringObj (SYMBOL_SOURCE_NAME (p->symbol), -1));
+				      Tcl_NewStringObj (SYMBOL_PRINT_NAME (p->symbol), -1));
 	  else
 	    Tcl_ListObjAppendElement (interp, elem,
-				      Tcl_NewStringObj (SYMBOL_SOURCE_NAME (p->msymbol), -1));
+				      Tcl_NewStringObj (SYMBOL_PRINT_NAME (p->msymbol), -1));
 
 	  if (show_files)
 	    {