Mercurial > hg > xemacs-beta

comparison src/device-x.c @ 1942:da8cdcec6dff

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
[xemacs-hg @ 2004-03-08 15:22:44 by james] frame.el synch with Emacs 21.3.
author james
date Mon, 08 Mar 2004 15:23:03 +0000
parents a8d8f419b459
children 65a5016a896f
comparison
equal deleted inserted replaced
1941:0637d85c1dd1 1942:da8cdcec6dff
1691 make_int (DisplayHeightMM (dpy, DefaultScreen (dpy)))); 1691 make_int (DisplayHeightMM (dpy, DefaultScreen (dpy))));
1692 case DM_num_bit_planes: 1692 case DM_num_bit_planes:
1693 return make_int (DisplayPlanes (dpy, DefaultScreen (dpy))); 1693 return make_int (DisplayPlanes (dpy, DefaultScreen (dpy)));
1694 case DM_num_color_cells: 1694 case DM_num_color_cells:
1695 return make_int (DisplayCells (dpy, DefaultScreen (dpy))); 1695 return make_int (DisplayCells (dpy, DefaultScreen (dpy)));
1696 case DM_num_screens:
1697 return make_int (ScreenCount (dpy));
1698 case DM_backing_store:
1699 switch (DoesBackingStore (DefaultScreenOfDisplay (dpy)))
1700 {
1701 case Always:
1702 return intern ("always");
1703 case WhenMapped:
1704 return intern ("when-mapped");
1705 default:
1706 return intern ("not-useful");
1707 }
1708 case DM_save_under:
1709 return (DoesSaveUnders (DefaultScreenOfDisplay (dpy)) == True)
1710 ? Qt : Qnil;
1696 default: /* No such device metric property for X devices */ 1711 default: /* No such device metric property for X devices */
1697 return Qunbound; 1712 return Qunbound;
1698 } 1713 }
1699 } 1714 }
1700 1715