Mercurial > hg > xemacs-beta

diff lisp/vm/vm-misc.el @ 189:489f57a838ef r20-3b21

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r20-3b21
author cvs
date Mon, 13 Aug 2007 09:57:07 +0200
parents 43dd3413c7c7
children
line wrap: on
line diff
--- a/lisp/vm/vm-misc.el	Mon Aug 13 09:56:30 2007 +0200
+++ b/lisp/vm/vm-misc.el	Mon Aug 13 09:57:07 2007 +0200
@@ -455,7 +455,8 @@
   (cond (vm-xemacs-p
 	 (eq (device-type) 'x))
 	(vm-fsfemacs-19-p
-	 (eq window-system 'x))))
+	 (or (eq window-system 'x)
+	     (eq window-system 'win32)))))
 
 (defun vm-run-message-hook (message &optional hook-variable)
   (save-excursion