[Monotone-devel] monotone.el patch for late-model xemacs

[Ken Sedgwick]

Greetings,

I've noticed that late-model (FC6) xemacs (21.5.27) have problems w/ 
monotone.el.

The problem is that the *monotone* buffer ends up write-protected and 
can not be modified after an initial monotone operation.

I think the issue is that monotone.el uses
    (toggle-read-only -1)
where
    (setq buffer-read-only nil)
is a better expression of the desired operation.

I suspect that the initial read-only status of the buffer changed along 
the way somewhere (everything used to work for me w/ FC4).

Anyway, I've found the following modifications to fix the problem:

***************
*** 325,331 ****
      (when (get-buffer-process mtn-buf)
        (error "Monotone is currently running"))
      ;; prep the buffer for output
!     (toggle-read-only -1)
      (erase-buffer)
      ;;(buffer-disable-undo (current-buffer))
      (setq default-directory mtn-top)
--- 328,334 ----
      (when (get-buffer-process mtn-buf)
        (error "Monotone is currently running"))
      ;; prep the buffer for output
!     (setq buffer-read-only nil)
      (erase-buffer)
      ;;(buffer-disable-undo (current-buffer))
      (setq default-directory mtn-top)

***************
*** 513,519 ****
      (when (not (equal (current-buffer) buf))
        (switch-to-buffer-other-window buf))
      (set-buffer buf)
!     (toggle-read-only -1)
      ;; Have the contents been commited?
      (when (eq monotone-commit-edit-status 'started)
        (message "Continuing commit message already started."))
--- 515,521 ----
      (when (not (equal (current-buffer) buf))
        (switch-to-buffer-other-window buf))
      (set-buffer buf)
!     (setq buffer-read-only nil)
      ;; Have the contents been commited?
      (when (eq monotone-commit-edit-status 'started)
        (message "Continuing commit message already started."))

Hope this helps ...

Ken

--
Ken Sedgwick
Bonsai Software, Inc.
http://www.bonsai.com/ken/
(510) 610-4162
address@hidden
Public Key: http://www.bonsai.com/ken/ken.asc
GPG Fingerprint: 851E 3B07 E586 0843 9434  5CC7 4033 3B9B 3F3F 9640