From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!not-for-mail From: Helmut Eller Newsgroups: gmane.emacs.bugs Subject: bug#10094: 24.0.91; M-C-q indents LOOP wrong Date: Mon, 21 Nov 2011 17:49:32 +0100 Message-ID: References: NNTP-Posting-Host: lo.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: dough.gmane.org 1321894263 25961 80.91.229.12 (21 Nov 2011 16:51:03 GMT) X-Complaints-To: usenet@dough.gmane.org NNTP-Posting-Date: Mon, 21 Nov 2011 16:51:03 +0000 (UTC) To: 10094@debbugs.gnu.org Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Mon Nov 21 17:50:59 2011 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([140.186.70.17]) by lo.gmane.org with esmtp (Exim 4.69) (envelope-from ) id 1RSX57-0007Mi-Ro for geb-bug-gnu-emacs@m.gmane.org; Mon, 21 Nov 2011 17:50:57 +0100 Original-Received: from localhost ([::1]:39904 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RSX57-0003vc-FV for geb-bug-gnu-emacs@m.gmane.org; Mon, 21 Nov 2011 11:50:57 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]:60469) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RSX51-0003us-DN for bug-gnu-emacs@gnu.org; Mon, 21 Nov 2011 11:50:55 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RSX4x-0002gR-HU for bug-gnu-emacs@gnu.org; Mon, 21 Nov 2011 11:50:51 -0500 Original-Received: from debbugs.gnu.org ([140.186.70.43]:59602) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RSX4x-0002gN-G0 for bug-gnu-emacs@gnu.org; Mon, 21 Nov 2011 11:50:47 -0500 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.69) (envelope-from ) id 1RSX69-0001BQ-UX for bug-gnu-emacs@gnu.org; Mon, 21 Nov 2011 11:52:01 -0500 X-Loop: help-debbugs@gnu.org In-Reply-To: Resent-From: Helmut Eller Original-Sender: debbugs-submit-bounces@debbugs.gnu.org Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Mon, 21 Nov 2011 16:52:01 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 10094 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: X-Debbugs-Original-To: bug-gnu-emacs@gnu.org Original-Received: via spool by submit@debbugs.gnu.org id=B.13218942874508 (code B ref -1); Mon, 21 Nov 2011 16:52:01 +0000 Original-Received: (at submit) by debbugs.gnu.org; 21 Nov 2011 16:51:27 +0000 Original-Received: from localhost ([127.0.0.1] helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RSX5Y-0001Ac-1R for submit@debbugs.gnu.org; Mon, 21 Nov 2011 11:51:27 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]) by debbugs.gnu.org with esmtp (Exim 4.69) (envelope-from ) id 1RSX5R-0001AQ-SU for submit@debbugs.gnu.org; Mon, 21 Nov 2011 11:51:22 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RSX4B-0002Wp-31 for submit@debbugs.gnu.org; Mon, 21 Nov 2011 11:50:02 -0500 Original-Received: from lists.gnu.org ([140.186.70.17]:53588) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RSX4B-0002Wl-1b for submit@debbugs.gnu.org; Mon, 21 Nov 2011 11:49:59 -0500 Original-Received: from eggs.gnu.org ([140.186.70.92]:60294) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RSX47-0003l1-8i for bug-gnu-emacs@gnu.org; Mon, 21 Nov 2011 11:49:59 -0500 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1RSX42-0002Vx-77 for bug-gnu-emacs@gnu.org; Mon, 21 Nov 2011 11:49:55 -0500 Original-Received: from lo.gmane.org ([80.91.229.12]:42602) by eggs.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1RSX42-0002Vj-25 for bug-gnu-emacs@gnu.org; Mon, 21 Nov 2011 11:49:50 -0500 Original-Received: from list by lo.gmane.org with local (Exim 4.69) (envelope-from ) id 1RSX3z-0006qM-KR for bug-gnu-emacs@gnu.org; Mon, 21 Nov 2011 17:49:47 +0100 Original-Received: from 212.46.171.226 ([212.46.171.226]) by main.gmane.org with esmtp (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 21 Nov 2011 17:49:47 +0100 Original-Received: from eller.helmut by 212.46.171.226 with local (Gmexim 0.1 (Debian)) id 1AlnuQ-0007hv-00 for ; Mon, 21 Nov 2011 17:49:47 +0100 X-Injected-Via-Gmane: http://gmane.org/ Original-Lines: 35 Original-X-Complaints-To: usenet@dough.gmane.org X-Gmane-NNTP-Posting-Host: 212.46.171.226 User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/24.0.91 (gnu/linux) Cancel-Lock: sha1:5DmUymri+GRFJH5XbjUDO+GMvkc= X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 3) X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.11 Precedence: list Resent-Date: Mon, 21 Nov 2011 11:52:01 -0500 X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.6 (newer, 2) X-Received-From: 140.186.70.43 X-BeenThere: bug-gnu-emacs@gnu.org List-Id: "Bug reports for GNU Emacs, the Swiss army knife of text editors" List-Unsubscribe: , List-Archive: List-Post: List-Help: List-Subscribe: , Errors-To: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Original-Sender: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Xref: news.gmane.org gmane.emacs.bugs:54125 Archived-At: * Lars Magne Ingebrigtsen [2011-11-21 16:05] writes: > If you use `common-lisp-indent-function', and you type in the following > function (using TAB) to indent, you get the following: > > (defun foo () > (loop for z from 1 upto 5 > do (princ z) > (terpri))) > > If you then `M-C-q' to fill the function, you end up with this: > > (defun foo () > (loop for z from 1 upto 5 > do (princ z) > (terpri))) > > I've debugged this slightly, and the problem seems to be that > `calculate-lisp-indent' is called to compute the indentation of the DO, > but then isn't called to compute the indentation of the forms. > > I don't have time to debug this further right now, but unless anybody > has an obvious solution to this, I'll try to fix this myself. This is my fix for the problem: (setq lisp-simple-loop-indentation 1) (setq lisp-loop-keyword-indentation 6) (setq lisp-loop-forms-indentation 6) It's an old problem: http://lists.gnu.org/archive/html/emacs-devel/2009-10/threads.html#00649 Helmut