[Emacs-diffs] trunk r115576: * lisp/mail/emacsbug.el (report-emacs-bug):

[Glenn Morris]

------------------------------------------------------------
revno: 115576
revision-id: address@hidden
parent: address@hidden
committer: Glenn Morris <address@hidden>
branch nick: trunk
timestamp: Tue 2013-12-17 20:03:07 -0500
message:
  * lisp/mail/emacsbug.el (report-emacs-bug):
  Only mention enable-multibyte-characters if non-standard.
modified:
  lisp/ChangeLog                 changelog-20091113204419-o5vbwnq5f7feedwu-1432
  lisp/mail/emacsbug.el          emacsbug.el-20091113204419-o5vbwnq5f7feedwu-73

=== modified file 'lisp/ChangeLog'
--- a/lisp/ChangeLog    2013-12-17 21:39:15 +0000
+++ b/lisp/ChangeLog    2013-12-18 01:03:07 +0000
@@ -1,3 +1,8 @@
+2013-12-18  Glenn Morris  <address@hidden>
+
+       * mail/emacsbug.el (report-emacs-bug):
+       Only mention enable-multibyte-characters if non-standard.
+
 2013-12-17  Juri Linkov  <address@hidden>
 
        * arc-mode.el (archive-extract-by-file): Check if directory exists

=== modified file 'lisp/mail/emacsbug.el'
--- a/lisp/mail/emacsbug.el     2013-09-17 07:39:54 +0000
+++ b/lisp/mail/emacsbug.el     2013-12-18 01:03:07 +0000
@@ -260,8 +260,11 @@
        "LC_ALL" "LC_COLLATE" "LC_CTYPE" "LC_MESSAGES"
        "LC_MONETARY" "LC_NUMERIC" "LC_TIME" "LANG" "XMODIFIERS"))
     (insert (format "  locale-coding-system: %s\n" locale-coding-system))
-    (insert (format "  default enable-multibyte-characters: %s\n"
-                   (default-value 'enable-multibyte-characters)))
+    ;; Only ~ 0.2% of people from a sample of 3200 changed this from
+    ;; the default, t.
+    (or (default-value 'enable-multibyte-characters)
+       (insert (format "  default enable-multibyte-characters: %s\n"
+                       (default-value 'enable-multibyte-characters))))
     (insert "\n")
     (insert (format "Major mode: %s\n"
                    (format-mode-line