Mercurial > emacs
comparison lisp/mail/emacsbug.el @ 57768:84cd4892a56e
* mail/emacsbug.el (report-emacs-bug): Insert x-server-vendor
and x-server-version in bug report.
| author | Jan Djärv <jan.h.d@swipnet.se> |
|---|---|
| date | Thu, 28 Oct 2004 07:37:02 +0000 |
| parents | c546768fdb22 |
| children | 8d3f889b4462 e24e2e78deda |
comparison
equal
deleted
inserted
replaced
| 57767:241be2c6b67a | 57768:84cd4892a56e |
|---|---|
| 126 (insert "\n\n") | 126 (insert "\n\n") |
| 127 (setq user-point (point)) | 127 (setq user-point (point)) |
| 128 (insert "\n\n\n") | 128 (insert "\n\n\n") |
| 129 | 129 |
| 130 (insert "In " (emacs-version) "\n") | 130 (insert "In " (emacs-version) "\n") |
| 131 (if (fboundp 'x-server-vendor) | |
| 132 (insert "Distributor `" (x-server-vendor) "', version " | |
| 133 (mapconcat 'number-to-string (x-server-version) ".") "\n")) | |
| 131 (if (and system-configuration-options | 134 (if (and system-configuration-options |
| 132 (not (equal system-configuration-options ""))) | 135 (not (equal system-configuration-options ""))) |
| 133 (insert "configured using `configure " | 136 (insert "configured using `configure " |
| 134 system-configuration-options "'\n\n")) | 137 system-configuration-options "'\n\n")) |
| 135 (insert "Important settings:\n") | 138 (insert "Important settings:\n") |