From mboxrd@z Thu Jan 1 00:00:00 1970 Path: news.gmane.org!.POSTED!not-for-mail From: Michael Heerdegen Newsgroups: gmane.emacs.bugs Subject: bug#26619: 26.0.50; Wrong indentation in emacs-lisp-mode Date: Thu, 27 Apr 2017 13:52:15 +0200 Message-ID: <87wpa62hlc.fsf@drachen> References: <87shkzsidm.fsf@calancha-pc> <87pofzontp.fsf@users.sourceforge.net> <87vaprlucs.fsf@drachen> <87mvb3omd0.fsf@users.sourceforge.net> <87h91aol5y.fsf@users.sourceforge.net> NNTP-Posting-Host: blaine.gmane.org Mime-Version: 1.0 Content-Type: text/plain X-Trace: blaine.gmane.org 1493294000 4914 195.159.176.226 (27 Apr 2017 11:53:20 GMT) X-Complaints-To: usenet@blaine.gmane.org NNTP-Posting-Date: Thu, 27 Apr 2017 11:53:20 +0000 (UTC) User-Agent: Gnus/5.13 (Gnus v5.13) Emacs/26.0.50 (gnu/linux) Cc: Kaushal Modi , 26619@debbugs.gnu.org To: npostavs@users.sourceforge.net Original-X-From: bug-gnu-emacs-bounces+geb-bug-gnu-emacs=m.gmane.org@gnu.org Thu Apr 27 13:53:12 2017 Return-path: Envelope-to: geb-bug-gnu-emacs@m.gmane.org Original-Received: from lists.gnu.org ([208.118.235.17]) by blaine.gmane.org with esmtp (Exim 4.84_2) (envelope-from ) id 1d3hyw-000164-Ts for geb-bug-gnu-emacs@m.gmane.org; Thu, 27 Apr 2017 13:53:11 +0200 Original-Received: from localhost ([::1]:60113 helo=lists.gnu.org) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1d3hz2-0001wi-M1 for geb-bug-gnu-emacs@m.gmane.org; Thu, 27 Apr 2017 07:53:16 -0400 Original-Received: from eggs.gnu.org ([2001:4830:134:3::10]:50470) by lists.gnu.org with esmtp (Exim 4.71) (envelope-from ) id 1d3hys-0001vQ-F8 for bug-gnu-emacs@gnu.org; Thu, 27 Apr 2017 07:53:07 -0400 Original-Received: from Debian-exim by eggs.gnu.org with spam-scanned (Exim 4.71) (envelope-from ) id 1d3hyo-0007XD-Io for bug-gnu-emacs@gnu.org; Thu, 27 Apr 2017 07:53:06 -0400 Original-Received: from debbugs.gnu.org ([208.118.235.43]:44169) by eggs.gnu.org with esmtps (TLS1.0:RSA_AES_128_CBC_SHA1:16) (Exim 4.71) (envelope-from ) id 1d3hyo-0007X9-F3 for bug-gnu-emacs@gnu.org; Thu, 27 Apr 2017 07:53:02 -0400 Original-Received: from Debian-debbugs by debbugs.gnu.org with local (Exim 4.84_2) (envelope-from ) id 1d3hyo-00052H-8A for bug-gnu-emacs@gnu.org; Thu, 27 Apr 2017 07:53:02 -0400 X-Loop: help-debbugs@gnu.org Resent-From: Michael Heerdegen Original-Sender: "Debbugs-submit" Resent-CC: bug-gnu-emacs@gnu.org Resent-Date: Thu, 27 Apr 2017 11:53:02 +0000 Resent-Message-ID: Resent-Sender: help-debbugs@gnu.org X-GNU-PR-Message: followup 26619 X-GNU-PR-Package: emacs X-GNU-PR-Keywords: patch Original-Received: via spool by 26619-submit@debbugs.gnu.org id=B26619.149329395319319 (code B ref 26619); Thu, 27 Apr 2017 11:53:02 +0000 Original-Received: (at 26619) by debbugs.gnu.org; 27 Apr 2017 11:52:33 +0000 Original-Received: from localhost ([127.0.0.1]:42368 helo=debbugs.gnu.org) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1d3hyL-00051X-94 for submit@debbugs.gnu.org; Thu, 27 Apr 2017 07:52:33 -0400 Original-Received: from mout.web.de ([212.227.15.3]:59292) by debbugs.gnu.org with esmtp (Exim 4.84_2) (envelope-from ) id 1d3hyI-00051H-Ql for 26619@debbugs.gnu.org; Thu, 27 Apr 2017 07:52:31 -0400 Original-Received: from drachen.dragon ([88.75.89.250]) by smtp.web.de (mrweb001 [213.165.67.108]) with ESMTPSA (Nemesis) id 0MMW5u-1dBvyG03bS-008L9s; Thu, 27 Apr 2017 13:52:10 +0200 In-Reply-To: <87h91aol5y.fsf@users.sourceforge.net> (npostavs's message of "Wed, 26 Apr 2017 18:31:53 -0400") X-Provags-ID: V03:K0:GQG6yExQOHtv/Y/2Ah/zg8dAC9+k0+fi5Hv5Osifa1nZ566UJnw 487dLtxPmckqB3obHEFplFjQzxJ46imkM2gjFQKPXGryaoqjF3+lnBXOxfUm89l6uG4l65G OfMP9/6xa5/BSBEBxJ4myawEzIGFiu99bh1jYrtl8IalGu69pDeYOeaqlS/ECBwYLU7f8cm nEKN86sbiPb3rLyOLPm6w== X-UI-Out-Filterresults: notjunk:1;V01:K0:TJZKAC5scY8=:r4gQrLrTUvj6Ja6ScR+n4w 31fny1PXWjYPf7TWTjvQXODMKgRdjs0dzTfJveLLjLwfAo2Ih6HGzgqF/RS/Dzfh1fah9AFfo ccDwuxOIlHpcNNTKCuL7uA9zbM8X9ajgq4HardrZfLsdlwbLrqjy4qhAFrQEw2Z1015KZCEhQ 8xNAv2uWECyUZSEUJfueYp6U3+ranOc9Ct030uE5kM/Z4X5h+myw7/o1mZALqoI45Qxk0D9bJ MRHToImVcsNYrPTtLoVoY1Gn8IsIXLvn/DW5bjdxJkFyAdkjb9UWLfzQLNc9ga3FwOcsI/9Ec UoRwoyHQtASV4YraSuyvU7x/38+nfuUdyITvEyEVjH2wZN/DNxVfzE1+1eCuQ4cSvSYTSa2NT ozqWaDBbQVpVcBd03PG7V6XdpUG/PC4PRrKDEDT1D5q8jxS0nK4SmtFndkmCHgZppKO/0NIAT A74bKwH7xOO3TZg+/zb1vWH4C7JBAgzVWhw3NoydH4fnSkm254Sw1Xlali9KIXjozcHp4Er3E leaEuRKpB6XuChgUQzfCHT9gW4aXl97I/L9T97FkXH/GBoNYBx8GMSf6Hnz78zpc6gIhLD61T vDLQSqGJ9Oc57RMs0cKdd10WuDg4qciZzg7kvsvCTpEbkiKY6D0ClGADmF+6A/zKd8aeceTIT aZUeR8pQP2va4Y07kGRccIYf3lXwZihcsJK0MzL58eEXRXejIUXbOEeOTTpiWkG+IFWTQ+L0z yS2mrfeq0BaCIQJ6fYXZIq8B7SOqHbyfq4FcRaEw/uVVA5VZN3BoEgPGI/QqSl0TVW5hqvX2 X-BeenThere: debbugs-submit@debbugs.gnu.org X-Mailman-Version: 2.1.18 Precedence: list X-detected-operating-system: by eggs.gnu.org: GNU/Linux 2.2.x-3.x [generic] X-Received-From: 208.118.235.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" Xref: news.gmane.org gmane.emacs.bugs:132051 Archived-At: npostavs@users.sourceforge.net writes: > Um, right, I didn't test that patch properly, it doesn't work at all. > Here's a fix for it, cumulative diff also attached. Thanks. Here is a recipe of a problem with that new patch: I have this code: #+begin_src emacs-lisp (defun el-search--split (matcher1 matcher2 list) "Helper for the \"append\" pattern type. When a splitting of LIST into two lists L1, L2 exist so that Li is matched by MATCHERi, return (L1 L2) for such Li, else return nil." (let ((try-match (lambda (list1 list2) (when (and (el-search--match-p matcher1 list1) (el-search--match-p matcher2 list2)) (list list1 list2)))) (list1 list) (list2 '()) (match nil)) ;; don't use recursion, this could hit `max-lisp-eval-depth' (while (and (not (setq match (funcall try-match list1 list2))) (consp list1)) (let ((last-list1 (last list1))) (if-let ((cdr-last-list1 (cdr last-list1))) ;; list1 is a dotted list. Then list2 must be empty. (progn (setcdr last-list1 nil) (setq list2 cdr-last-list1)) (setq list1 (butlast list1 1) list2 (cons (car last-list1) list2))))) match)) #+end_src I mark the region between the forth line of the defun's body, with point at the open paren of "(list list1 list2)", and the end of the defun. Hitting C-M-\ results in all but the first line of the region given an indentation of zero. TIA, Michael.