Don't require initial whitespace in vendor name.

f81dbe56 · Karl Heuer · afcd9910 · f81dbe56
Commit f81dbe56 authored Nov 02, 1995 by Karl Heuer
Hide whitespace changes
Inline Side-by-side

Showing with 1 addition and 1 deletion

lisp/term/x-win.el lisp/term/x-win.el +1 -1

No files found.
--- a/lisp/term/x-win.el
+++ b/lisp/term/x-win.el
@@ -704,7 +704,7 @@ This is in addition to the primary selection.")

 ;; 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))