--- a/lisp/x11/x-menubar.el	Mon Aug 13 08:48:18 2007 +0200
+++ b/lisp/x11/x-menubar.el	Mon Aug 13 08:48:42 2007 +0200
@@ -476,6 +476,15 @@
 	 :style radio :selected (eq (default-toolbar-position) 'right)]
 	)
        )))
+      ("Mouse"
+       ["Avoid-Text"
+	(if (equal (device-type) 'x)
+	    (if mouse-avoidance-mode
+		(mouse-avoidance-mode 'none)
+	      (mouse-avoidance-mode 'banish))
+	  (beep)
+	  (message "This option requires a window system."))
+	:style toggle :selected (and mouse-avoidance-mode window-system)])
       ("Open URLs With"
        ["Emacs-W3" (setq browse-url-browser-function 'browse-url-w3)
 	:style radio
@@ -560,6 +569,10 @@
        ["Sample .Xdefaults"	(find-file
 				 (expand-file-name "sample.Xdefaults"
 						   data-directory))
+	t]
+       ["Sample enriched"	(find-file
+				 (expand-file-name "enriched.doc"
+						   data-directory))
 	t])
       "-----"
       ("Lookup in Info"
@@ -1076,6 +1089,9 @@
 		 ',(specifier-spec-list toolbar-buttons-captioned-p
 					'global)))))
 
+     ;; mouse
+     mouse-avoidance-mode
+
      ;; Open URLs With
      browse-url-browser-function