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