← Back to team overview

vm team mailing list archive

Re: [Question #137005]: Cursor not at beginning of mail message

 

Question #137005 on VM changed:
https://answers.launchpad.net/vm/+question/137005

Julian Bradfield proposed the following answer:
Actually, I see there was a proposed solution to this on xemacs-beta
in 2007.

Try applying the following patch to VM:

2007-09-07  Mike Sperber  <mike@xxxxxxxxxx>

	* tapestry.el (tapestry-set-window-map): Use
	`frame-reduce-to-one-window' instead of `delete-other-windows' to
	keep the point from moving inadvertently.


Index: tapestry.el
===================================================================
RCS file: /pack/xemacscvs/XEmacs/packages/xemacs-packages/vm/tapestry.el,v
retrieving revision 1.5
diff -u -r1.5 tapestry.el
--- tapestry.el	3 Sep 2003 00:43:45 -0000	1.5
+++ tapestry.el	7 Sep 2007 08:29:13 -0000
@@ -205,7 +205,11 @@
 	  root-window )
       (if (tapestry-windows-match-map map map-width map-height)
 	  (tapestry-first-window)
-	(delete-other-windows)
+	(if (fboundp 'frame-reduce-to-one-window)
+	    (frame-reduce-to-one-window (selected-frame))
+	  ;; `delete-other-windows' may cause the window point to move
+	  ;; as it tries to minimize redisplay
+	  (delete-other-windows))
 	(setq root-window (selected-window))
 	(tapestry-apply-window-map map map-width map-height root-window)
 	(setq tapestry-windows-changed t)

--=-=-=--

-- 
You received this question notification because you are a member of VM
development team, which is an answer contact for VM.