Mercurial > hg > xemacs-beta

comparison lisp/x-init.el @ 4062:aa22980554d9

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2007-07-16 12:26:00 by aidan] Do the XFree86 startup heuristics for xorg, Cygwin too.
author aidan
date Mon, 16 Jul 2007 12:26:03 +0000
parents c3175ca37443
children e214ff9f9507
comparison
equal deleted inserted replaced
4061:10c99e4eefae 4062:aa22980554d9
230 ;; is managing, so assume all MIT displays are Suns... HA HA! 230 ;; is managing, so assume all MIT displays are Suns... HA HA!
231 (string-equal "MIT X Consortium" vendor) 231 (string-equal "MIT X Consortium" vendor)
232 (string-equal "X Consortium" vendor)) 232 (string-equal "X Consortium" vendor))
233 ;; Ok, we think this could be a Sun keyboard. Run the Sun code. 233 ;; Ok, we think this could be a Sun keyboard. Run the Sun code.
234 (x-win-init-sun)) 234 (x-win-init-sun))
235 ((string-match "XFree86" vendor) 235 ((string-match #r"XFree86\|Cygwin/X\|The X\.Org Foundation" vendor)
236 ;; Those XFree86 people do some weird keysym stuff, too. 236 ;; Those XFree86 people do some weird keysym stuff, too.
237 (x-win-init-xfree86))))) 237 (x-win-init-xfree86)))))
238 238
239 ;; Moved from x-toolbar.el, since InfoDock doesn't dump x-toolbar.el. 239 ;; Moved from x-toolbar.el, since InfoDock doesn't dump x-toolbar.el.
240 (defun x-init-toolbar-from-resources (locale) 240 (defun x-init-toolbar-from-resources (locale)