From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Ken Manheimer Newsgroups: gmane.emacs.devel Subject: Re: move-beginning-of-line misbehaves on wrapped-line invisible text - recent cvs checkout Date: Sun, 22 Jan 2006 11:12:31 -0500 Message-ID: <2cd46e7f0601220812v53945980x8d045c3df55e5f2c@mail.gmail.com> References: <2cd46e7f0601121612y386d057ft68324aeb352b777d@mail.gmail.com> NNTP-Posting-Host: main.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1 Content-Transfer-Encoding: quoted-printable X-Trace: sea.gmane.org 1137956017 18702 80.91.229.2 (22 Jan 2006 18:53:37 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Sun, 22 Jan 2006 18:53:37 +0000 (UTC) Cc: emacs-devel@gnu.org Original-X-From: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Sun Jan 22 19:53:34 2006 Return-path: Envelope-to: ged-emacs-devel@m.gmane.org Original-Received: from lists.gnu.org ([199.232.76.165]) by ciao.gmane.org with esmtp (Exim 4.43) id 1F0kLB-0006I9-B9 for ged-emacs-devel@m.gmane.org; Sun, 22 Jan 2006 19:53:29 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1F0kNl-0000wW-FM for ged-emacs-devel@m.gmane.org; Sun, 22 Jan 2006 13:56:09 -0500 Original-Received: from mailman by lists.gnu.org with tmda-scanned (Exim 4.43) id 1F0i42-0003s7-E5 for emacs-devel@gnu.org; Sun, 22 Jan 2006 11:27:38 -0500 Original-Received: from exim by lists.gnu.org with spam-scanned (Exim 4.43) id 1F0i2I-0002NR-Ig for emacs-devel@gnu.org; Sun, 22 Jan 2006 11:25:51 -0500 Original-Received: from [199.232.76.173] (helo=monty-python.gnu.org) by lists.gnu.org with esmtp (Exim 4.43) id 1F0hs2-0005NJ-Mg for emacs-devel@gnu.org; Sun, 22 Jan 2006 11:15:15 -0500 Original-Received: from [66.249.92.195] (helo=uproxy.gmail.com) by monty-python.gnu.org with esmtp (Exim 4.34) id 1F0hwc-0002yL-UH for emacs-devel@gnu.org; Sun, 22 Jan 2006 11:19:59 -0500 Original-Received: by uproxy.gmail.com with SMTP id u2so241414uge for ; Sun, 22 Jan 2006 08:12:31 -0800 (PST) DomainKey-Signature: a=rsa-sha1; q=dns; c=nofws; s=beta; d=gmail.com; h=received:message-id:date:from:to:subject:cc:in-reply-to:mime-version:content-type:content-transfer-encoding:content-disposition:references; b=T56YQpnx8CkHZ/nBgYWXN7uptaoqEmX3C5Ja/Hfd465U30sHvGxTMU9XWj/goLN9cNiMtu97PTSAp83Nc596uThPjMKFRhQEb4Ds2bb2/a4+9LYLfs0n0B0tubLKS/kK8Ziom+SeWenyOBCbH3OMIqgjTVzBBx3XeU97Ypvo6Zc= Original-Received: by 10.66.239.17 with SMTP id m17mr410413ugh; Sun, 22 Jan 2006 08:12:31 -0800 (PST) Original-Received: by 10.66.220.6 with HTTP; Sun, 22 Jan 2006 08:12:31 -0800 (PST) Original-To: rms@gnu.org In-Reply-To: Content-Disposition: inline X-BeenThere: emacs-devel@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: "Emacs development discussions." List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Errors-To: emacs-devel-bounces+ged-emacs-devel=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.devel:49398 Archived-At: this works for me! On 1/19/06, Richard M. Stallman 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.=20 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 (/=3D arg 1) > (line-move (1- arg) t)) > ! (beginning-of-line 1) > (let ((orig (point))) > (vertical-motion 0) > (if (/=3D orig (point)) > --- 3735,3747 ---- > (or arg (setq arg 1)) > (if (/=3D 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 (/=3D orig (point)) >