130 |
(insert "In " (emacs-version) "\n") |
(insert "In " (emacs-version) "\n") |
131 |
(if (fboundp 'x-server-vendor) |
(if (fboundp 'x-server-vendor) |
132 |
(condition-case nil |
(condition-case nil |
133 |
(insert "Distributor `" (x-server-vendor) "', version " |
(insert "X server distributor `" (x-server-vendor) "', version " |
134 |
(mapconcat 'number-to-string (x-server-version) ".") "\n") |
(mapconcat 'number-to-string (x-server-version) ".") "\n") |
135 |
(error t))) |
(error t))) |
136 |
(if (and system-configuration-options |
(if (and system-configuration-options |