aboutsummaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorChong Yidong2011-02-06 10:04:31 -0500
committerChong Yidong2011-02-06 10:04:31 -0500
commitf8b351c190ecb3d01bd81a0c4624153b15a95f89 (patch)
tree15820500c469cff875386983fd898fde0fbcb8e3
parent184469b7a092b069aa0ba65053855fbaa91b4607 (diff)
downloademacs-f8b351c190ecb3d01bd81a0c4624153b15a95f89.tar.gz
emacs-f8b351c190ecb3d01bd81a0c4624153b15a95f89.zip
Remove the check for non-ASCII in report-emacs-bug-hook (Bug#7925).
* mail/emacsbug.el (report-emacs-bug-hook): Remove the check for non-ASCII characters.
-rw-r--r--lisp/ChangeLog5
-rw-r--r--lisp/mail/emacsbug.el12
2 files changed, 5 insertions, 12 deletions
diff --git a/lisp/ChangeLog b/lisp/ChangeLog
index 9857abb879b..b7cdb5f96ee 100644
--- a/lisp/ChangeLog
+++ b/lisp/ChangeLog
@@ -1,3 +1,8 @@
12011-02-06 Chong Yidong <cyd@stupidchicken.com>
2
3 * mail/emacsbug.el (report-emacs-bug-hook): Remove the check for
4 non-ASCII characters (Bug#7925).
5
12011-02-05 Glenn Morris <rgm@gnu.org> 62011-02-05 Glenn Morris <rgm@gnu.org>
2 7
3 * emacs-lisp/cl-macs.el (return-from): Fix doc typo. 8 * emacs-lisp/cl-macs.el (return-from): Fix doc typo.
diff --git a/lisp/mail/emacsbug.el b/lisp/mail/emacsbug.el
index a621647bcf1..9aac041e8bd 100644
--- a/lisp/mail/emacsbug.el
+++ b/lisp/mail/emacsbug.el
@@ -340,18 +340,6 @@ usually do not have translators to read other languages for them.\n\n")
340 (string-equal (buffer-substring-no-properties (point-min) (point)) 340 (string-equal (buffer-substring-no-properties (point-min) (point))
341 report-emacs-bug-orig-text) 341 report-emacs-bug-orig-text)
342 (error "No text entered in bug report")) 342 (error "No text entered in bug report"))
343 ;; Check the buffer contents and reject non-English letters.
344 ;; FIXME message-mode probably does this anyway.
345 (goto-char (point-min))
346 (skip-chars-forward "\0-\177")
347 (unless (eobp)
348 (if (or report-emacs-bug-no-confirmation
349 (y-or-n-p "Convert non-ASCII letters to hexadecimal? "))
350 (while (progn (skip-chars-forward "\0-\177")
351 (not (eobp)))
352 (let ((ch (following-char)))
353 (delete-char 1)
354 (insert (format "=%02x" ch))))))
355 343
356 ;; The last warning for novice users. 344 ;; The last warning for novice users.
357 (unless (or report-emacs-bug-no-confirmation 345 (unless (or report-emacs-bug-no-confirmation