[ELPA-diffs] /srv/bzr/emacs/elpa r195: Make sure the buffer isn't read-only before altering.

[Lars Magne Ingebrigtsen]

------------------------------------------------------------
revno: 195
committer: Lars Magne Ingebrigtsen <address@hidden>
branch nick: elpa
timestamp: Wed 2012-04-11 15:13:09 +0200
message:
  Make sure the buffer isn't read-only before altering.
modified:
  packages/debbugs/debbugs-gnu.el

=== modified file 'packages/debbugs/debbugs-gnu.el'
--- a/packages/debbugs/debbugs-gnu.el   2012-04-11 13:10:11 +0000
+++ b/packages/debbugs/debbugs-gnu.el   2012-04-11 13:13:09 +0000
@@ -846,7 +846,8 @@
 (defun debbugs-gnu-widen ()
   "Display all the currently selected bug reports."
   (interactive)
-  (let ((id (debbugs-gnu-current-id t)))
+  (let ((id (debbugs-gnu-current-id t))
+       (buffer-read-only nil))
     (tabulated-list-init-header)
     (tabulated-list-print)
     (when id
@@ -856,6 +857,7 @@
   "Only display the bugs matching STRING."
   (interactive "sNarrow to: ")
   (let ((id (debbugs-gnu-current-id t))
+       (buffer-read-only nil)
        status)
     (debbugs-gnu-widen)
     (goto-char (point-min))
@@ -873,7 +875,8 @@
 (defun debbugs-gnu-goto (id)
   "Go to the line displaying bug ID."
   (goto-char (point-min))
-  (while (not (equal (debbugs-gnu-current-id t) id))
+  (while (and (not (eobp))
+             (not (equal (debbugs-gnu-current-id t) id)))
     (forward-line 1)))
 
 (defun debbugs-gnu-toggle-tag ()