🚀 go-pugleaf

Further checking reveals some more facts, and a solution (maybe?) to
the VM 5.32beta vm-scroll-forward problem I reported yesterday.

  * The problem only happens in vm-mutable-windows is t, not nil (I
    didn't try another value).

  * If you have a summary and a message displayed, then you use 'n' to
    get to the next message, it displays properly.

    However, if you then (with the cursor in the summary window) press
    SPC, it jumps forward about 1 1/2 pages in the message buffer so
    you lose part of the message.

I commented out the (scroll-up nil) line from
vm-page.el:vm-howl-if-eom and all the above problems were fixed.  I
don't know what the problem was/is, since it *seems* like the
save-window-excursion should take care of this scroll-up, but it
causes all sorts of problems and removing it doesn't seem to have much
of an effect.

Patch below.  If anyone has a better idea of what's going on/how to
fix it, please let me know, thanks,

                                                                paul
-----
 ------------------------------------------------------------------
| Paul D. Smith                          |    paul_smith@dg.com    |
| Data General Corp.                     | pds@lemming.webo.dg.com |
| Network Systems Development Division   |                         |
| Open Network Systems Development       |   "Pretty Damn S..."    |
 ------------------------------------------------------------------
-------------------------------------------------------------------------------
--- vm-page.el-dist     Mon Apr 22 20:50:05 1991
+++ vm-page.el  Fri Nov  6 10:46:52 1992
@@ -124,7 +124,9 @@
              (save-window-excursion
                (let ((next-screen-context-lines 0))
                  (condition-case ()
-                     (progn (select-window w) (scroll-up nil) nil)
+                     (progn (select-window w)
+                            ;(scroll-up nil)
+                            nil)
                    (error t)))))
            (= (vm-text-end-of (car vm-message-pointer)) (point-max))
            (vm-emit-eom-blurb))))))