From mboxrd@z Thu Jan 1 00:00:00 1970 Path: main.gmane.org!not-for-mail From: Kevin Rodgers Newsgroups: gmane.emacs.help Subject: Re: skip over whitespace in same column Date: Mon, 22 Nov 2004 10:56:50 -0700 Message-ID: <30enj5F2umqpqU1@uni-berlin.de> References: NNTP-Posting-Host: deer.gmane.org Mime-Version: 1.0 Content-Type: text/plain; charset=ISO-8859-1; format=flowed Content-Transfer-Encoding: 7bit X-Trace: sea.gmane.org 1101146469 32026 80.91.229.6 (22 Nov 2004 18:01:09 GMT) X-Complaints-To: usenet@sea.gmane.org NNTP-Posting-Date: Mon, 22 Nov 2004 18:01:09 +0000 (UTC) Original-X-From: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Mon Nov 22 19:00:57 2004 Return-path: Original-Received: from lists.gnu.org ([199.232.76.165]) by deer.gmane.org with esmtp (Exim 3.35 #1 (Debian)) id 1CWIUi-0004Uq-00 for ; Mon, 22 Nov 2004 19:00:57 +0100 Original-Received: from localhost ([127.0.0.1] helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.33) id 1CWIdl-0004kf-Qt for geh-help-gnu-emacs@m.gmane.org; Mon, 22 Nov 2004 13:10:17 -0500 Original-Path: shelby.stanford.edu!newsfeed.stanford.edu!syros.belnet.be!news.belnet.be!news-FFM2.ecrc.net!fu-berlin.de!uni-berlin.de!not-for-mail Original-Newsgroups: gnu.emacs.help Original-Lines: 31 Original-X-Trace: news.uni-berlin.de VZuAX2n66moC0YpCE0IWSQKsOHNRi2I6zScsWUvbR+qYE7BKM= User-Agent: Mozilla Thunderbird 0.9 (X11/20041105) X-Accept-Language: en-us, en In-Reply-To: Original-Xref: shelby.stanford.edu gnu.emacs.help:126812 Original-To: help-gnu-emacs@gnu.org X-BeenThere: help-gnu-emacs@gnu.org X-Mailman-Version: 2.1.5 Precedence: list List-Id: Users list for the GNU Emacs text editor List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Original-Sender: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Errors-To: help-gnu-emacs-bounces+geh-help-gnu-emacs=m.gmane.org@gnu.org Xref: main.gmane.org gmane.emacs.help:22212 X-Report-Spam: http://spam.gmane.org/gmane.emacs.help:22212 Albert Reiner wrote: > is there a command to move point down (or up) over all lines where > there is whitespace in the column of point? E.g., invoking that > command on the "I" of the starting "IF" would get me to the "E" of > "END IF" in the following: > > ,---- > | IF (whatever) THEN > | foo > | bar > | END IF > `---- > > C-h a column RET did not return anything that looked useful to me. Try this: (defun forward-to-same-indentation () "Move forward to the next line with the same indentation." (interactive) (let ((indentation (progn (back-to-indentation) (current-column)))) (while (and (not (eobp)) (progn (forward-to-indentation 1) (/= (current-column) indentation)))) (move-to-column indentation))) -- Kevin Rodgers