Mercurial > hg > xemacs-beta

comparison lisp/vm/vm-misc.el @ 36:c53a95d3c46d r19-15b101

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Import from CVS: tag r19-15b101
author cvs
date Mon, 13 Aug 2007 08:53:38 +0200
parents ec9a17fef872
children 05472e90ae02
comparison
equal deleted inserted replaced
35:279432d5c479 36:c53a95d3c46d
374 (vm-multiple-frames-possible-p)) 374 (vm-multiple-frames-possible-p))
375 375
376 (defun vm-menu-support-possible-p () 376 (defun vm-menu-support-possible-p ()
377 (or (and (boundp 'window-system) 377 (or (and (boundp 'window-system)
378 (or (eq window-system 'x) 378 (or (eq window-system 'x)
379 (eq window-system 'ns) ;; NextStep
379 (eq window-system 'win32))) 380 (eq window-system 'win32)))
380 (and (fboundp 'device-type) (eq (device-type) 'x)))) 381 (and (fboundp 'device-type) (eq (device-type) 'x))))
381 382
382 (defun vm-toolbar-support-possible-p () 383 (defun vm-toolbar-support-possible-p ()
383 (and (vm-xemacs-p) 384 (and (vm-xemacs-p)