Mercurial > emacs

comparison lisp/mail/emacsbug.el @ 37065:9a4674999109

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(report-emacs-bug): Report LC_COLLATE, LC_MESSAGES, LC_MONETARY, LC_NUMERIC, and LC_TIME as well. From Paul Eggert.
author Eli Zaretskii <eliz@gnu.org>
date Thu, 29 Mar 2001 15:29:29 +0000
parents 05a619c13dea
children deefb2de7c81
comparison
equal deleted inserted replaced
37064:428092eb22d4 37065:9a4674999109
118 (if (and system-configuration-options 118 (if (and system-configuration-options
119 (not (equal system-configuration-options ""))) 119 (not (equal system-configuration-options "")))
120 (insert "configured using `configure " 120 (insert "configured using `configure "
121 system-configuration-options "'\n")) 121 system-configuration-options "'\n"))
122 (insert "Important settings:\n") 122 (insert "Important settings:\n")
123 (insert (format " value of $LC_ALL: %s\n" (getenv "LC_ALL"))) 123 (mapcar
124 (insert (format " value of $LC_CTYPE: %s\n" (getenv "LC_CTYPE"))) 124 '(lambda (var)
125 (insert (format " value of $LANG: %s\n" (getenv "LANG"))) 125 (insert (format " value of $%s: %s\n" var (getenv var))))
126 '("LC_ALL" "LC_COLLATE" "LC_CTYPE" "LC_MESSAGES"
127 "LC_MONETARY" "LC_NUMERIC" "LC_TIME" "LANG"))
126 (insert (format " locale-coding-system: %s\n" locale-coding-system)) 128 (insert (format " locale-coding-system: %s\n" locale-coding-system))
127 (insert (format " default-enable-multibyte-characters: %s\n" 129 (insert (format " default-enable-multibyte-characters: %s\n"
128 default-enable-multibyte-characters)) 130 default-enable-multibyte-characters))
129 (insert "\n") 131 (insert "\n")
130 (insert "Please describe exactly what actions triggered the bug\n" 132 (insert "Please describe exactly what actions triggered the bug\n"