[Emacs-diffs] Changes to emacs/lisp/mail/emacsbug.el

[Markus Rost]

Index: emacs/lisp/mail/emacsbug.el
diff -c emacs/lisp/mail/emacsbug.el:1.56 emacs/lisp/mail/emacsbug.el:1.57
*** emacs/lisp/mail/emacsbug.el:1.56    Sat May 18 15:18:46 2002
--- emacs/lisp/mail/emacsbug.el Sun May 19 20:39:23 2002
***************
*** 203,215 ****
  
  (defun report-emacs-bug-hook ()
    (save-excursion
!     (goto-char (point-max))
!     (skip-chars-backward " \t\n")
!     (if (and (= (- (point) (point-min))
!               (length report-emacs-bug-orig-text))
!            (equal (buffer-substring (point-min) (point))
!                   report-emacs-bug-orig-text))
!       (error "No text entered in bug report"))
  
      ;; Check the buffer contents and reject non-English letters.
      (save-excursion
--- 203,216 ----
  
  (defun report-emacs-bug-hook ()
    (save-excursion
!     (save-excursion
!       (goto-char (point-max))
!       (skip-chars-backward " \t\n")
!       (if (and (= (- (point) (point-min))
!                 (length report-emacs-bug-orig-text))
!              (equal (buffer-substring (point-min) (point))
!                     report-emacs-bug-orig-text))
!         (error "No text entered in bug report")))
  
      ;; Check the buffer contents and reject non-English letters.
      (save-excursion