emacs-devel
[Top][All Lists]
Advanced

[Date Prev][Date Next][Thread Prev][Thread Next][Date Index][Thread Index]

Re: address@hidden: C-n doesn't work in Customize Option buffer in -nw w


From: Chong Yidong
Subject: Re: address@hidden: C-n doesn't work in Customize Option buffer in -nw with long value displayed]
Date: Tue, 18 Jul 2006 10:22:17 -0400
User-agent: Gnus/5.11 (Gnus v5.11) Emacs/22.0.50 (gnu/linux)

> From: johnsu01 <address@hidden>
> Subject: C-n doesn't work in Customize Option buffer in -nw with long value
>       displayed
>
> M-x customize-variable RET gnus-summary-line-format RET
>
> Make sure the value is displayed (so the button now says Hide Value). With
> point on the "Gnus Summary Line Format" (or on the value button itself), hit
> C-n. The cursor won't move.

The bug occurs because `line-beginning-position' and
`line-end-position' respect field boundaries, but `move-to-column'
doesn't.  The following change to `line-move-to-column' should fix
this problem, but it would be nice if someone could check to make sure
it won't get point stuck in other situations.

*** emacs/lisp/simple.el.~1.809.~       2006-07-15 09:34:18.000000000 -0400
--- emacs/lisp/simple.el        2006-07-18 10:20:19.000000000 -0400
***************
*** 3695,3703 ****
  This function works only in certain cases,
  because what we really need is for `move-to-column'
  and `current-column' to be able to ignore invisible text."
!   (if (zerop col)
!       (beginning-of-line)
!     (move-to-column col))
  
    (when (and line-move-ignore-invisible
             (not (bolp)) (line-move-invisible-p (1- (point))))
--- 3695,3705 ----
  This function works only in certain cases,
  because what we really need is for `move-to-column'
  and `current-column' to be able to ignore invisible text."
!   (let ((opoint (point)))
!     (if (zerop col)
!       (beginning-of-line)
!       (move-to-column col))
!     (goto-char (constrain-to-field (point) opoint)))
  
    (when (and line-move-ignore-invisible
             (not (bolp)) (line-move-invisible-p (1- (point))))




reply via email to

[Prev in Thread] Current Thread [Next in Thread]