From: Ken Manheimer <ken.manheimer@gmail.com>
Cc: emacs-devel@gnu.org
Subject: Re: move-beginning-of-line misbehaves on wrapped-line invisible text - recent cvs checkout
Date: Sun, 22 Jan 2006 11:12:31 -0500 [thread overview]
Message-ID: <2cd46e7f0601220812v53945980x8d045c3df55e5f2c@mail.gmail.com> (raw)
In-Reply-To: <E1EzdqM-0008Mu-Ta@fencepost.gnu.org>
this works for me!
On 1/19/06, Richard M. Stallman <rms@gnu.org> wrote:
> move-beginning-of-line is supposed to move to the beginning of the
> current _display_ line. emphasis on "display" is because i'm not
> quite clear what it means.
>
> I believe the idea is that newlines that don't really appear as such
> do not count.
>
> I don't see the problems you reported with the medium-size lines,
> but I do see the problem with the longest line. This seems to fix it.
> Does this give good results in general?
i see none of the problems that had been showing without the patch. i
haven't exercised emacs very much with the change, but see that it's
already in CVS. i'll report if i encounter any problems with it.
thanks!
ken
> *** simple.el 05 Jan 2006 10:48:16 -0500 1.783
> --- simple.el 19 Jan 2006 12:11:57 -0500
> ***************
> *** 3734,3740 ****
> (or arg (setq arg 1))
> (if (/= arg 1)
> (line-move (1- arg) t))
> ! (beginning-of-line 1)
> (let ((orig (point)))
> (vertical-motion 0)
> (if (/= orig (point))
> --- 3735,3747 ----
> (or arg (setq arg 1))
> (if (/= arg 1)
> (line-move (1- arg) t))
> !
> ! ;; Move to beginning-of-line, ignoring fields and invisibles.
> ! (skip-chars-backward "^\n")
> ! (while (and (not (bobp)) (line-move-invisible-p (1- (point))))
> ! (goto-char (previous-char-property-change (1- (point))))
> ! (skip-chars-backward "^\n"))
> !
> (let ((orig (point)))
> (vertical-motion 0)
> (if (/= orig (point))
>
next prev parent reply other threads:[~2006-01-22 16:12 UTC|newest]
Thread overview: 9+ messages / expand[flat|nested] mbox.gz Atom feed top
2006-01-13 0:12 move-beginning-of-line misbehaves on wrapped-line invisible text - recent cvs checkout Ken Manheimer
2006-01-19 17:45 ` Richard M. Stallman
2006-01-22 16:12 ` Ken Manheimer [this message]
2006-01-23 18:17 ` Ken Manheimer
2006-01-23 20:47 ` Ken Manheimer
2006-01-26 3:28 ` Lőrentey Károly
2006-01-27 0:19 ` Ken Manheimer
2006-01-30 18:46 ` Richard M. Stallman
2006-01-31 19:10 ` Ken Manheimer
Reply instructions:
You may reply publicly to this message via plain-text email
using any one of the following methods:
* Save the following mbox file, import it into your mail client,
and reply-to-all from there: mbox
Avoid top-posting and favor interleaved quoting:
https://en.wikipedia.org/wiki/Posting_style#Interleaved_style
List information: https://www.gnu.org/software/emacs/
* Reply using the --to, --cc, and --in-reply-to
switches of git-send-email(1):
git send-email \
--in-reply-to=2cd46e7f0601220812v53945980x8d045c3df55e5f2c@mail.gmail.com \
--to=ken.manheimer@gmail.com \
--cc=emacs-devel@gnu.org \
/path/to/YOUR_REPLY
https://kernel.org/pub/software/scm/git/docs/git-send-email.html
* If your mail client supports setting the In-Reply-To header
via mailto: links, try the mailto: link
Be sure your reply has a Subject: header at the top and a blank line
before the message body.
Code repositories for project(s) associated with this public inbox
https://git.savannah.gnu.org/cgit/emacs.git
This is a public inbox, see mirroring instructions
for how to clone and mirror all data and code used for this inbox;
as well as URLs for read-only IMAP folder(s) and NNTP newsgroup(s).