Re: VM 5.32 scrolls erroneously

Article View: gnu.emacs.vm.bug

Article #9002

#9002

From: k p c
Date: Mon, 18 May 1992 10:40

25 lines
1459 bytes

i use this by jwz.  there are still some similar bugs but i don't know
their cause.

(provide 'jwz-vm-5-32-fix)

(defun vm-howl-if-eom ()
  (let ((vmp vm-message-pointer))
    (vm-within-current-message-buffer
     (let ((w (get-buffer-window (current-buffer)))
	   (vm-message-pointer vmp))
       (and w
	    (save-excursion
	      (save-window-excursion
		(condition-case ()
		    (let ((next-screen-context-lines 0))
		      (select-window w)
		      (save-excursion
			(save-window-excursion
			  (scroll-up nil)))
		      nil)
		  (error t))))
	    (= (vm-text-end-of (car vm-message-pointer)) (point-max))
	    (vm-emit-eom-blurb))))))
--
no signature

Technical Details

Message-ID: <KPC.92May18024039@zog.arc.nasa.gov>

Path: arc1-ca.pugleaf.net!sparky!uunet!sun-barr!ames!kronos.arc.nasa.gov!pluto.arc.nasa.gov!kpc

References: <KIMMO.SUOMINEN.92May17023840@kannel.lut.fi>

Show Full Headers

Complete Article Headers

X-Google-Language: ENGLISH,ASCII-7-bit
X-Google-Thread: f6829,8c9401a8e4c1c473
X-Google-Attributes: gidf6829,public
X-Google-ArrivalTime: 1992-05-17 13:44:28 PST
Newsgroups: gnu.emacs.vm.bug
Path: arc1-ca.pugleaf.net!sparky!uunet!sun-barr!ames!kronos.arc.nasa.gov!pluto.arc.nasa.gov!kpc
From: kpc@pluto.arc.nasa.gov (k p c)
Subject: Re: VM 5.32 scrolls erroneously
In-Reply-To: Kimmo.Suominen@lut.fi's message of 16 May 92 17:38:40 GMT
Message-ID: <KPC.92May18024039@zog.arc.nasa.gov>
Sender: usenet@kronos.arc.nasa.gov (Will Edgington, wedgingt@ptolemy.arc.nasa.gov)
Nntp-Posting-Host: zog.arc.nasa.gov
Organization: NASA Ames Research Center (Sterling)
References: <KIMMO.SUOMINEN.92May17023840@kannel.lut.fi>
Distribution: gnu
Date: Mon, 18 May 1992 10:40:39 GMT
Lines: 25

Reply to Parent Message