Lines Matching +defs:color +defs:name
89 a TTY device name such as \"/dev/ttyp2\" (as determined by
107 TTY should be the name of a tty device file (e.g. \"/dev/ttyp3\" under
158 name; in such a case, the first device found is returned.)"
179 (defun device-name (&optional device)
180 "Return the name of the specified device."
222 (defun device-color-cells (&optional device)
224 ((x win32 w32 pm) (x-display-color-cells device))
225 (ns (ns-display-color-cells device))
263 (let ((val (symbol-name (x-display-visual-class device))))
265 ((string-match "color" val) 'color)
268 ((fboundp 'x-display-color-p)
269 (if (x-display-color-p device)
270 'color
272 (t 'color)))
276 (let ((val (symbol-name (pm-display-visual-class device))))
278 ((string-match "color" val) 'color)
281 ((fboundp 'pm-display-color-p)
282 (if (pm-display-color-p device)
283 'color
285 (t 'color)))
289 (let ((val (symbol-name (ns-display-visual-class device))))
291 ((string-match "color" val) 'color)
294 ((fboundp 'ns-display-color-p)
295 (if (ns-display-color-p device)
296 'color
299 (otherwise 'color)))
303 (list 'color 'grayscale 'mono))
307 Valid classes are 'color, 'grayscale, and 'mono."