[Top][All Lists]
[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]
Re: gnus-carpal-mode and mouse-autoselect-window
From: |
Reiner Steib |
Subject: |
Re: gnus-carpal-mode and mouse-autoselect-window |
Date: |
Mon, 21 Feb 2005 16:09:07 +0100 |
User-agent: |
Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux) |
On Fri, Feb 18 2005, Klaus Zeitler wrote:
> gnus-carpal-mode has a little annoyance when mouse-autoselect-window is set.
> Whenever I switch to the carpal window to press one of the buttons, emacs
> automatically scrolls the carpal buffer to the end. This happens only when I
> set mouse-autoselect-window to t.
> I've added
> (goto-char (point-min))
> as the last line to gnus-carpal-setup-buffer and now it works fine.
I don't use gnus-carpal-mode normally. I couldn't see any difference
in the behavior with or without this patch[1]:
--8<---------------cut here---------------start------------->8---
--- gnus-salt.el 19 Sep 2004 21:20:09 +0200 7.6
+++ gnus-salt.el 21 Feb 2005 15:55:26 +0100
@@ -1042,7 +1042,7 @@
(let ((fill-column (- (window-width) 2)))
(fill-region (point-min) (point-max)))
(set-window-point (get-buffer-window (current-buffer))
- (point-min)))))))
+ (goto-char (point-min))))))))
(defun gnus-carpal-select ()
"Select the button under point."
--8<---------------cut here---------------end--------------->8---
Or did you mean to add (goto-char (point-min)) _after_ the `if'
clause?
But I saw some strange display problem: After scrolling down in the
Carpal Summary buffer with <mouse-5>, I get...
--8<---------------cut here---------------start------------->8---
mark read tick clear expirable move scroll next-unread prev-unread first best
article headers uudecode enter-digest fetch-parent mail move copy respool
article headers uudecode enter-digest fetch-parent mail move copy respool
--8<---------------cut here---------------end--------------->8---
... (note the duplicated line) instead of...
--8<---------------cut here---------------start------------->8---
mark read tick clear expirable move scroll next-unread prev-unread first best
article headers uudecode enter-digest fetch-parent mail move copy respool
threads lower kill post post local mail followup reply cancel misc exit fed-up
--8<---------------cut here---------------end--------------->8---
Bye, Reiner.
[1] With...
(setq mouse-autoselect-window t gnus-carpal t)
--
,,,
(o o)
---ooO-(_)-Ooo--- | PGP key available | http://rsteib.home.pages.de/