# HG changeset patch # User Karl Heuer # Date 815287050 0 # Node ID 56f14b5a7295697ae009f6f6b771ba19b0a7ee0c # Parent aeffe5a33e51444a3afb089c8d4137b9b360c0df Don't require initial whitespace in vendor name. diff -r aeffe5a33e51 -r 56f14b5a7295 lisp/term/x-win.el --- a/lisp/term/x-win.el Tue Oct 31 20:59:01 1995 +0000 +++ b/lisp/term/x-win.el Thu Nov 02 04:37:30 1995 +0000 @@ -704,7 +704,7 @@ ;; Sun expects the menu bar cut and paste commands to use the clipboard. ;; This has ,? to match both on Sunos and on Solaris. -(if (string-match " Sun Microsystems,? Inc\\." +(if (string-match "Sun Microsystems,? Inc\\." (x-server-vendor)) (menu-bar-enable-clipboard))