Index: watch.tcl
===================================================================
RCS file: /cvs/src/src/gdb/gdbtk/library/watch.tcl,v
retrieving revision 1.11
diff -u -p -r1.11 watch.tcl
--- watch.tcl	1 Dec 2006 03:34:39 -0000	1.11
+++ watch.tcl	24 Jul 2011 19:28:45 -0000
@@ -1,5 +1,5 @@
 # Watch window for Insight.
-# Copyright (C) 2002, 2003, 2006 Red Hat
+# Copyright (C) 2002, 2003, 2006, 2011 Red Hat
 #
 # This program is free software; you can redistribute it and/or modify it
 # under the terms of the GNU General Public License (GPL) as published by
@@ -62,6 +62,7 @@ itcl::class WatchWin {
     foreach var $Watched {
       $var delete
     }
+    set Watched {}
     $tree remove all
   }